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ABSTRACT 


This  document  contains  proKram  design  specifications  for 
the  Interim  Network  Front  End  (INFE)  under  development  by  Digital 
Technolosy  Incorporated.  The  INFE  will  connect  a NWMCCS  h6000  to 
AUTODIN  II.  The  INFE  is  an  modification  of  the  Experimental 
Network  Front  End  (ENFE).  The  ENFE  connected  a WWMCCS  hbOOO  to 


the  ARFANET.  The  INFE  and  the  ENFE  differ  only  in  the  network 
protocols  that  they  implement.  Only  AUTODIN  II  protocol  software 
is  described  here.  Detailed  descriptions  of  the  Transmission 
Control  Frotocol  (TCP)  and  Terminal  to  Host  Protocol  (ThP) 
modules  follow. 
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BACKGROUND 


A Network  Front  End  (NFE)  is  a computer  system  interposed 
between  a host  computer  and  a network.  The  NFE  relieves  the  host 
of  the  burden  of  network  interface  software.  It  also  provides  an 
alternative  mechanism  for  local  terminals  to  access  the  network 
when  the  host  is  down.  The  place  of  the  Network  Front  End  is 
shown  in  FI ku  re  1 . 


The  software  specified  here  will  implement  a WWhCCS 
Interim  NFE  (INFE)  that  will  provide  Initial  operational 
capability  (IOC)  for  AUTODIN  II.  This  is  Phase  b of  the  WWMCCS 
NFE  program.  Phase  B was  preceded  by  the  development  of  Network 
UNIX  and  a Phase  A Experimental  NFE  (ENFE). 

UNIX  is  a general  purpose  operating  system  developed  by 
bell  Telephone  Laboratories  for  PDP-11  computers.  In  1975, 
University  of  Illinois  staff  added  ARPANET  Network  Control 
Program  (NCP)  software  and  ARPANET  terminal  (Telnet)  software  to 
UNIX  to  make  Network  UNIX. 

In  1976,  the  Network  UNIX  staff  added  host  to  Front  End 
Protocol  (HFP)  software  to  Network  UNIX  creating  the  Phase  A 
WWMCCS  Experimental  NFE  (ENFE). 

In  October  1976,  the  Network  UNIX  and  ENFE  development 
team  formed  Digital  Technology  Incorporated  (DTI).  DTI  is 
developing  an  INFE  by  adding  AUTODIN  11  protocol  to  the  ENFE. 
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INFE  ARChlTECTU  Fit 


The  INFE  facilitates  data  transfer  between 

a.  a host  and  AUTODIN  II, 

b.  a host  and  INFE  terminals,  and 

c.  INFE  terminals  and  AUTODIN  II. 


HFP . Services  in  the  INFE  support  processes  in  the  host. 
The  processes  access  their  services  usln^  Host  to  Front  End 
Protocol  (HFP).  HFP  has  three  levels  (link,  channel,  service). 
The  lowest  level  (link  level)  controls  the  hardware  interface 
between  the  host  and  front  end.  The  next  level  (channel  level) 
implements  lostical  channels  between  all  processes  in  the  host  and 
all  services  in  the  INFE.  Each  channel  is  sequenced  and  flow 
controlled.  HFP  Messatres  are  exchan^red  on  HFP  channels.  HFP 
hessa«es  have  two  major  parts:  a header  and  a text  field.  The 
structure  of  the  header  is  defined  by  the  channel  level  of  HFP. 
The  structure  of  the  text  field  is  defined  by  the  third  level  of 
HFP  (process-service  level).  There  is  a separate  process-service 
level  HFP  specification  for  each  service. 

TCP . Transmission  Control  Protocol  (TCP)  is  a process- 
to-process  data  transfer  protocol.  TCP  is  used  on  AUTODIN  II  to 
insure  the  reliable  and  error  free  transmission  of  data.  TCP 
transfers  data  seaments  over  AUTODIN  11  using  a Segment  Interface 
Protocol  (SIP).  Processes  use  TCP  letters  to  communicate  via 
AUTOOIN  II.  TCP  error  controls,  flow  controls,  and  sequences  TCP 
letters.  A transmitting  TCP  breaks  letters  into  segments  for  SIP 
transmission  over  AUTODIN  II.  SIP  handles  the  AUTODIN  II 
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hardware  Interface.  A receiving  SIP  passes  segments  onto  its  TCP 


partner  for  reassembly  into  letters. 

SIP . The  INFE  will  be  available  before  AUTODIN  II  IOC. 
Initially  the  SIP  Module  implemented  on  the  INFE  will  be  a Pseudo 
Segment  Interface  Protocol  (PSIP).  The  PSIP  will  appear  to  be  a 
SIP  Module  to  the  TCP  Module.  However,  the  PSIP  will  use  the 
ARPANET,  not  AUTODIN  II,  for  communication.  When  AUTODIN  II 
becomes  available,  a SIP  will  be  substituted  for  the  PSIP. 

TH  P . Terminal  to  Host  Protocol  (THP)  defines  the 
terminal  communication  standards  for  AUTODIN  II.  ThP  uses  TCP  as 
its  data  transport  mechanism. 

Software  Modules . 

Figure  2 shows  the  communication  routes  supported  by  the 
INFE  and  the  software  modules  implemented  in  the  INFE.  The  SIP 
Module  (PSIP  Module)  and  the  UNIX  Terminal  Handler  are 
implemented  as  UNIX  device  drivers.  All  other  INFE  modules  are 
implemented  as  separate  UNIX  user-level  processes.  We  will 
sometimes  use  the  terms  process  and  device  driver  when  discussing 
these  modules. 

Link  Protocol  Module . The  INFE  Link  Protocol  Module 
Implements  the  link  level  protocol  of  HFP.  This  module  will  be 
an  Identical  copy  of  the  ENFE  Link  Protocol  Module.  The  Phase  A 
ENFE  experiments  showed  that  the  link  level  protocol  should  be 
augmented  with  flow  control  and  error  detection /correction . 
These  facilities  could  be  added  in  the  future. 
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Channe 1 Protocol  hodu le . The  INFE  Channel  Protocol 
Module  Implements  the  channel  level  protocol  of  HFP.  The  ENPE 
Channel  Protocol  Module  will  be  used  with  minor  changes.  These 
changes  correspond  to  the  minor  change  made  in  HFP.  (The  HFP 
signal  command  has  been  eliminated.) 

T CP  Service  Module . The  INFE  TCP  Service  Module 
implements  the  process-service  level  of  HFP  for  TCP  service. 
This  module  maps  host  process  requests  for  TCP  into  standard  UNIX 
I/O  calls  (open,  close, read,  etc.)  to  the  TCP  Module.  The  INFE 
TCP  Service  Module  will  use  the  structure  of  the  ENFE  Host-Host 
Service  Module. 

TH  P Service  Module . The  INFE  THP  Service  Module 
implements  the  process-service  level  of  HFP  for  THP  service.  HFP 
Messages  containing  THP  requests  are  mapped  into  standard  UNIX 
I/O  calls  to  the  THP  Module.  The  INFE  THP  Service  Module  will 
use  the  structure  of  the  ENFE  Server  Virtual  Terminal  Service 
Module. 


TCP  Module . The  INFE  TCP  Module  implements  TCP.  This 
will  be  a major  new  module.  Is  is  discussed  in  detail  below. 

TH  P Module . The  INFE  THP  Module  Implements  THP.  This 
also  will  be  a major  new  module.  It  is  discussed  in  detail 
below. 

SIP  Module . The  INFE  SIP  Module  will  implement  SIP  on 
the  ARPANET.  That  la,  it  will  be  a PSIP  that  will  mimic  an 
AUTODIN  II  network  device  driver.  The  ENFE  ARPANET  device  driver 
will  not  be  used  in  the  PSIP. 
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UNIX  Ter mlna 1 handler . The  INf  E UNIX  Terminal  handler 
terminals  attached  to  the  INFE.  The  ENFE  UNIX  Terminal 
will  be  modified  to  take  advantage  of  non-blockinir 
1/0  . 
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The  TCP  Module  will  implement  the  latest  version  of  TCP 
["Internetwork  Transmission  Control  Protocol',  TCP  Version  3, 
Cerf  and  Postel,  January  1976].  It  is  expected  that  this  version 
will  be  very  similar  to  the  final  AUTODIN  II  TCP  specification. 
The  connection  access  control  mechanisms  described  in  the 
preliminary  TCP  specification  ["Transmission  Control  Protocol 
Specification",  Postel,  Garlick,  and  Rom,  July  15,  1976]  will  be 
implemented  by  the  TCP  Module.  When  a final  AUTODIN  11  TCP 
specification  is  available,  the  TCP  Module  will  be  modified  to 
match . 


The  ENFE  software  requires  a PDP-11/M5  or  PDP-11/70. 
Smaller  PDP-11's  (e.g.,  11/34  and  11/40)  do  not  have  adequate 
kernel  address  space.  Yet  there  is  strong  interest  in  usintr 
smaller  PDP-11's  as  INFE’s.  Reduction  of  ENFE  kernel  size  is 
requ  i re  d . 

In  the  ENFE,  the  NCP  is  split  into  a kernel  portion  and  a 
user  portion  (called  the  NCP  Daemon).  For  maximum  throuirhput, 
the  INFE  TCP  should  also  have  a kernel  portion.  However,  the 
size  of  the  kernel  portion  would  preclude  operation  on  smaller 
PDP-11's.  Thus  TCP  is  belnff  Implemented  as  a single  user  prrcess 
outside  of  the  kernel  address  space. 

User  level  processes  (i.e.,  most  of  the  INFE  software 
modules)  communicate  with  the  TCP  process  (and  each  other)  via 
standard  UNIX  I/O  calls  (open,  close,  read,  etc.).  To  do  this, 
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we  added  a standard  UNIX  1/0  interface  to  the  interprocess 
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communication  facility  we  developed  while  at  the  University  of 
Illinois.  1/0  calls  (e.R.,  read,  write,  open)  directed  to  the 
TCP  process  are  changed  into  1/0  messages.  These  messages 
contain  the  message  type  (open,  close,  read,  etc.),  identify  the 
sender  (process  id,  user  id,  file  id),  and  identify  the  sender’s 
buffer.  New  UNIX  calls  were  implemented  to  allow  a process  to: 
wait  for  an  1/0  message, 
reply  to  an  1/0  message,  and 
access  the  user's  buffer. 

1/0  requests  are  received  from  the  THP  process,  the  TCP 
process,  and  other  INFL  processes.  1/0  replies  are  received  from 
the  Pseudo  Segment  Interface  Protocol  (PSIP)  device  driver  when 
network  reads  and  writes  have  been  completed. 

Non-blocking  read  and  writes  are  issued  to  the  PSIP 
device  driver.  I/O  replies  are  sent  to  the  requesting  process 
when  1/0  requests  have  been  processed. 

Data  received  from  a user  program  is  packaged  Into 
segments  for  transmission  over  the  network.  Each  segment  is 
assigned  a sequence  number  and  checksummed.  The  sequence  numbers 
are  used  for  flow  control  and  for  duplicate  and  missing  segment 
detection.  Checksums  are  used  to  insure  data  integrity. 

When  a correctly  sequenced  and  checksummed  segment  is 
received  from  the  network,  a network  acknowledgement  is 
transmitted.  Received  segments  are  assembled  into  letters. 
Complete  letters  are  passed  to  user  programs.  Unacknowledged 
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segments  are  retransmitted  on  timeout  (possibly  generatinc 
duplicate  segments). 


net_secun’ty 


TCP  SUBROUTINE  CALLING  HIERARCHY 


SLaaLral  flow 


The  TCP  Module  is  a loop  (MAIN)  which  waits  for  and  then 
processes  UNIX  I/O  measagea . Each  message  Is  associated  with  a 
new  or  existing  network  connection.  When  an  I/O  message  Is 
received,  the  TCP  Module  locates  or  constructs  a Transmission 
Control  Block  (TCfa)  for  the  connection.  The  connection  state 
(estab,  syn  sent,  etc)  and  message  type  (open,  close,  read,  etc.) 
are  used  to  call  a function  specific  subroutine.  The  TCP  Module 
Is  divided  In  two  major  sections:  network  and  user.  The  network 
section  handles  1/0  replies  from  the  PSIP  device  driver  and  sends 
1/0  replies  to  user- level  processes  (e.g.,  TCP  Service  Module, 
TH P Module).  The  user  section  handles  I/O  requests  from  user- 
level  processes. 


Netwpr k . NETIN  Is  called  when  an  1/0  reply  Is  received 
from  the  PSIP  device.  NETIN  calls  CHECKSUM  to  validate  segment 
data  Integrity.  NETIN  calls  NET_TCE  to  locate  the  wTransmisslon 
Control  block  for  the  connection.  NET_SECUHnY  Is  called  to 
Implement  AUTODIN  11  security,  precedence,  and  transmission 
control  code  handling.  The  segment  header  Is  processed 
(D_0PT10NS,  D_SE0_ATT,  and  D_ACK_ATT)  and  a connection  state 
subroutine  Is  called.  The  connection  state  subroutines  are: 


N_CL0SE , 
N_L1STEN , 
N_SYN  SENT, 
N_SYN_RCVD , 
N_ESTAB , 
N_FIN_WA1T , 
N_CLS  WT,  and 
N.CLOSING . 


close  mechanisms.  N_&STAE  processes  user  data.  N_tSTAb  uses 
segment  sequence  and  acknowledgement  attributes  (i.e., 
acknowledgement  in  sequence  and  believable)  to  perform  Initial 
processing.  N_ESTAb  calls  ASSEMBLE  to  handle  state  dependent 
processing  of  segments.  ASSEMBLE  calls  INSERT  to  combine  network 
segments  into  letters.  ASSEMBLE  then  calls  TO_USEh  to  pass  1/0 
replies  for  any  complete  letters  to  the  user. 

llSLfiC  • USER_IN  is  called  when  an  I/O  request  is  received 
from  a user.  USER_1N  checks  the  request  for  an  open  function. 
If  an  open  request  is  found,  ORARAM  is  called  to  parse  the 
parameters.  0REN_1TT  is  then  called  to  perform  the  open.  If  the 
request  in  not  an  open  request,  U_SECURITY  is  called  to  enforce 
AUTODIN  II  security,  precedence,  and  transmission  control  code 
conventions.  The  request  function  type  is  then  used  to  call  one 
of  four  subroutines:  U_CL0SE  , U_READ,  U_SEND,  or  U_SRECIAL.  Each 
of  the  subroutines  uses  the  connection  state  to  determine 
processing. 

U_CL0SE  checks  the  connection  state.  If  the  connection 
is  partially  established,  ABORT  is  called.  If  the  connection  is 
established,  a TCP  FIN  segment  is  generated,  and  SEND  is  called 
to  initiate  its  transfer  to  the  network. 

U_READ  checks  the  connection  state.  If  the  connection  is 
not  established,  an  error  1/0  read  reply  is  sent  to  the  user.  If 
the  connection  is  established,  a descriptor  for  the  read  request 
buffer  is  linked  into  the  t_rcvq  queue.  U_READ  then  calls  NETIN 
to  copy  any  previously  received  network  data  to  the  user  buffer. 
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U SEND  checks  the  connection  state.  11  the  connection  is 


( 
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not  established,  an  error  1/0  write  reply  is  sent  to  the  user. 
11  the  connection  is  established,  a descriptor  lor  the  write 
buller  is  linked  into  the  t_sndq  queue.  SEND  is  then  called  to 
initiate  the  transfer  ol  user  data  to  the  network. 

U_SPEC1AL  is  called  to  handle  connection  maintenance 
lunctions.  At  present,  only  a status  lunction  is  dellned.  Other 
lunctlons  will  be  defined  as  needed.  The  status  function  returns 
connection  status  inlormation.  The  connection  state,  local  and 
remote  ports,  receive  and  transmit  1 low  control  information,  and 
security  inlormation  are  returned  to  the  user. 

Data  flows  in  two  directions:  from  a user-level  process 
to  the  network,  and  1 rom  the  network  to  a user-level  process. 


Network-to-user . The  t_rcvq  is  used  to  store  user-level 
read  requests.  Each  entry  in  this  queue  contains  a descriptor 
which  defines  a user-level  buffer  in  which  network  data  is  to  be 
stored.  Network  data  is  processed  by  NETIN.  Each  user  buller  is 
filled  with  network  data.  When  a buller  is  lull,  a read  1/0 
reply  is  sent  to  the  user-level-process.  This  is  repeated  until 


a network  segment  is  emptied  or  the  t_rcvq  queue  is  exhausted. 

UatC-kC-ftfitMCrK  • User-level  data  is  processed  by  b_SEND. 

Each  write  request  contains  a descriptor  for  data  to  be  sent  over 
a connection.  The  descriptors  are  linked  into  a llfo  ordered  | 

queue  (t_sndq)  by  SEND.  Each  entry  in  the  queue  is  processed.  ? 

Each  entry  contains  user-level  data  to  be  sent  to  a remote  * 


subscriber.  When  network  acknowledRements  are  received,  entries 
are  deleted  from  the  queue  and  write  I/O  replies  are  sent  to  the 
user-le vel-process . If  a retransmission  is  required,  the  queue 
is  reprocessed  and  SEND  is  again  called  to  transfer  queue  entries 
to  the  network. 
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L£f  PAIA 


This  is  a description  of  the  Tormat  of  a TCP  Module 
Transmission  Control  block  (TCb).  A TCb  is  allocated  for  each 
network  connection.  The  first  column  specifies  the  field  size. 
Int  defines  a l6-blt  field  (e.jr.  Int  a;)  or  an  array  of  l6-bit 
fields  (e.fr.  int  a[3]);  Char  defines  an  b-bit  field  ( e . ft . char 
a;)  or  array  of  b-blt  fields  ( e . i? . char  a[3]).  Struct  defines  a 
complex  data  structure  (e.tt.,  struct  (char  name[30];  int  SSN[3]i 
person).  "Struct  person  *abc"  defines  a be  to  a a 16-bit  pointer 
to  a struct  with  the  person  format. 


struct  teb  1 


int 

t_l por  t [ 2 ] ; 

/ k 

local  port  */ 

int 

t_  f port [ 2 ] ; 

/* 

foreign  port 

int 

t_f tcp[ 2] ; 

/* 

foreign  tep  and  net  *■  / 

int 

t_rw i n ; 

receive  window  */ 

int 

t_swin ; 

/* 

send  window  */ 

int 

t_ou  t ; 

/‘ 

num.  bytes  in  transmission 

int 

t_s  en  d ; 

num.  bytes  waiting  to  send  */ 

int 

t_a eked  ; 

/‘ 

bytes  acked  not  pass  to  usr  •/ 

int 

t_s_s  eq [ 2 ] ; 

/* 

last  acked  by  fgn  tep  */ 

int 

t_s_n  X t [ 2 ] ; 

next  sea  we  should  use  •/ 

int 

t_r_s  eq [ 2 ] ; 

/*• 

last  seq  we  acked  */ 

int 

t_3y n_seq [ 2 ] ; 

/*■ 

seq  num  consumed  by  the  SIN  */ 

int 

t_f in_s  eq [ 2 ] ; 

/«• 

seq  num  consumed  by  the  FIN  *•  / 

int 

t_s_ur(t[  2]  ; 

/* 

send  urgent  seq.  number 

int 

t_r_u  rK[ 2 ] ; 

/* 

rev  ureent  seq.  number  */ 

int 

t_s_b  u f ; 

/* 

send  buf  size  •/ 

int 

t_r_buf ; 

/*- 

receive  buf  size 

int 

t_s_f rg ; 

/ * 

curr  send  buff  fragm^ent  •/ 

int 

t_r_f rg ; 

/*■ 

current  rev  buffer'  fragment 

int 

t_state ; 

state  --  0 to  7 ■/ 

int 

t_n  time; 

/*• 

number  of  timeouts 

int 

t_n  rc  V ; 

/* 

user  reads  outstanding  */ 

int 

t_n s nd ; 

/ * 

user  writes  outstanding 

int 

t_p  rec ; 

connection  precedence  */ 

int 

t_s_3  ec  ; 

/k 

send  security 

int 

t_r_sec ; 

/* 

receive  security  */ 

int 

t_t  cc ; 

transmission  control  code 

int 

t_f lags ; 

/* 

flags 

int 

t_c  t rl ; 

control  bits  to  send 

char 

•t_pk  t ; 

/fc 

curr.  read  bfr  */ 

int 

t_nopen ; 

/fc 

number  times  opened  */ 

int 

t_c los  el d ; 

/* 

reply  id  for  q'd  close 

struct 

revq  *t_rcvq; 

users  rev  descriptors  */ 
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struct  sndq  ‘t_sndq;  /*  users  snd  descriptors  */ 
struct  idq  *>t_opnq;  open  reply  descriptors  */ 

}; 

Ihe  format  of  the  internet  header  follows.  The  Internet 
header  is  found  at  the  beffinninp  of  each  network  packet.  It 
contains  the  source  address,  destination  address,  and  packet 
length  (in  octets ) . 


struct  inpacket 


char 

i n_p rot ; 

/• 

version  and  protocol  */ 

char 

in_opt ; 

/♦- 

OPT,  DP,  TOS  */ 

i nt 

in_l ength  ; 

len  of  packet  in 

octets  * / 

int 

in_pkid  ; 

/* 

internet  packet 

id  •/ 

int 

in_f r_num ; 

/• 

fragment  number 

*/ 

int 

in_dtcp [ 2 ] ; 

/* 

dest  tcp  and  net 

id  ^ / 

int 

in_dpor  t [ 2 ] ; 

/» 

destination  port 

int 

in_atcp [ 2 ] ; 

source  tcp  and  net  id 

int 

in_apor  t [ 2 ] ; 

/* 

source  port  ■/ 

char 

in_op  ts r j ; 

options  if  any  ^ 

/ 

The  format  of  a TCP  segment  header  follows.  A TCP 
segment  header  immediately  follows  each  internet  header.  The 
header  contains  the  information  required  to  send  and  receive  data 
and  control  Information.  These  fields  include  send  and 
acknowledgement  sequence  numbers,  receive  window,  checksum,  and 
an  urgency  ptr. 


struct  packet 

{ 


int 

p_seq[2]  : 

seq  number  of  this  segment  */ 

int 

p_ack [ 2 ] ; 

/* 

what  we  are  acking 

int 

p_ctrl ; 

/‘ 

tcpcontrolbits*/ 

int 

p_window ; 

/* 

window  we  are  given  wrt  n_seq  *■  / 

int 

p_cksum ; 

/* 

checksum  for  segment 

int 

p_urg ; 

/* 

urgent  ptr  */ 

char 

p_opts [ ] ; 

/‘ 

if  any 

-16- 


mi  SiM.fiM.lMij 


The  following  is  a list  of  the  the  major  1 CP  Module 
subroutines  with  a brief  description  of  each  subroutine  function, 
a ck 

see  what  has  been  a ck  now  1 e dir  e d by  the  remote  TCP 
assemble 

handle  network  data  reassembly 
checksum 

checksum  a network  packet 
d_a  ck_at  t 

determine  ack  validity 
d_seq_a  tt 

determine  sequence  number  validity 
d_opti ons 

process  the  options  in  the  packet 

i n 1 1 

initialize  queues  and  open  loet  and  PSIP  files 

main 

driving  subroutine 

net  i n 

high  level  process  of  network  packet 
net_secu  r ity 

security  check  of  a network  packet 

n_closed 

process 

n_closlng 

process 

n_cl 3_w  t 

process 

n_es  ta  b 

process 

n_f in_wait 

process 

n_l i ste  n 

process 

h_sy n_rc  vd 

1 


segment  when  TCP  is  in  the  closed  state 

segment  when  TCP  is  in  closing  state 

segment  when  TCP  is  in  close  wait  state 

segment  when  TCP  is  in  established  state 

segment  when  TCP  is  in  fin  wait  state 

I 

segment  when  TCP  is  in  listen  state  •' 

I 
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process  segment  when  TCP  is  in  sync  received  state 


n_sy n_sent 

process  segment  when  TCP  is  in  syn  sent  state 
o pa  ram 

process  open  request  parameters 


res  e t 

reset  the  connection 


send 

send  data  to  the  network 
to_net 

write  the  segment  to  the  network 
to_user 

write  the  segment  to  the  network 
us  er_i n 

first  level  handling  of  user  request 
u_a  bor t 

process  a users  abort  request 
u_c los  e 

process  a users  close  request 
u_r  ea  d 

process  a users  read  request 
u_s  end 

process  a users  write  request 


THF  MODULE 


Intrody  cti_gn 

Termina l-to-Host  Protocol  (IhP)  is  a virtual  terminal 
protocol  which  uses  TCP  as  a data  transport  mechanism.  The  ThP 
Module  provides  a mechanism  which  allows  INPE  terminals  to  access 
the  host,  and  implements  the  IHP  described  in  "Termi nal-to-host 
Protocol  Specification",  [Postel,  Garlick,  and  horn,  July  15, 
1976].  Is  is  expected  that  this  version  will  be  very  similar  to 
the  final  AUIODIN  II  ThP  specification.  When  a final  AUTOLIN  11 
IHP  specification  is  available,  the  ThP  Module  will  be  modified 
to  mat  ch . 

LLsw 

Inputs  . The  THP  Module  receives  1/0  messages  from  the 
Ihr  Service  Module,  INPE  terminals  (UNIX  Terminal  handler),  and 
the  TCP  Module.  The  THP  Module  receives  I/O  requests  from  the 
THP  Service  Module.  These  requests  are  generated  in  response  to 
THP  Service  Module  1/0  calls  (open,  close,  read,  write,  and 
iospcl).  The  IhP  Module  receives  I/O  replies  from  the  INPE 
terminal  device  driver  (UNIX  Terminal  Handler)  and  the  TCP 
Module.  These  replies  are  menerated  in  response  to  outputs 
descr i bed  below. 

Ou  tpu  ts . The  THP  Module  sends  I/O  messaRes  to  the  THP 
Service  Module,  INPE  terminals,  and  the  TCP  Module.  The  THP 
Module  issues  1/0  calls  to  the  UNIX  Terminal  handler  and  the  TCP 
Module.  The  THP  Module  sends  replies  to  the  THP  Service  Module. 
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Data  is  received  from  the  TCP  Module,  INFE  terminals,  and 


I 


! 


the  THP  Service  Module. 

T CP  Module  Data . I/O  replies  are  received  from  the  TCP 
Module  when  previously  Issued  UNIX  1/0  reads  have  been  completed. 
When  a read  1/0  reply  is  received,  the  buffer  associated  with  the 
read  has  been  filled  with  network  data.  The  data  is  broken  into 
one  or  more  pieces  which  are  queued  on  the  to_user  queue. 

The  to_user  queue  is  processed  by  the  TG_USER  subroutine. 
The  queue  may  contain  user  data  and/or  THP  controls.  Data  is 
copied  into  a per-connecti on  line  buffer  and  removed  from  the 
queue.  THP  option  negotiations  for  INPE  terminals  are  processed 
immediately  by  NET_0PTI0N.  Other  THP  controls  are  handled  by 
special  routines,  one  per  control  type.  If  the  connection  is 
associated  with  an  INFE  terminal,  data  is  transferred  to  the 
terminal  from  the  line  buffer.  If  the  connection  is  associated 
with  the  THP  Service  Module,  the  data  is  transferred  to  buffers 
received  in  previous  I/O  read  requests. 

Term! nal  and  IHP  Service  Module  Data . When  data  is 
received  from  an  INFE  terminal  or  the  THP  Service  Module,  it  is 
scanned  for  1 oca  1 1 y-d ef i ne u commands  or  special  characters  (e.g. 
line  feed).  Local  commands  or  special  characters  are  processed 
by  the  PARSE_C0M  subroutine.  THP  controls  and  blocks  of  data  are 
queued  on  the  to_net  queue. 

The  to_net  queue  is  processed  by  the  T0_NET  subroutine. 
The  queue  may  contain  data  or  THP  controls  to  be  sent  over  the 
net.  Data  and  controls  are  copied  into  network  transmit  buffers 
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as  the  buffers  become  available.  If  data  was  received  in  a Thr 
Service  Module  write  I/O  request,  a write  10  reply  is  sent  to  the 
THf-  Service  Module  when  all  of  the  data  has  been  copied  into 
network  transmit  buffers. 

Con  t rol  flow 

The  ThP  Module  MAIN  subroutine  is  a loop  which  waits  for 
and  initiates  processing  of  I/O  messages.  The  source  of  the 
message  is  used  to  branch  to  one  of  three  sections  of  software: 
from  User  TTY  software,  from  TCP  Module  software,  or  from  ThP 
Service  software.  When  control  returns  from  one  of  the  three 
sections,  the  to_user  queue  is  examined  for  any  data  to  be  sent 
to  the  user.  If  there  is  data,  the  T0_LSfP  subroutine  is  called. 
The  to_net  queue  is  then  examined  for  data  to  be  sent  to  the  TCP 
Module.  If  there  is  data,  the  T0_NET  subroutine  is  called. 
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From  User  XUL*  The  From  User  TTY  software  is  called  when 
an  1/0  reply  is  received  from  an  INFE  terminal.  The  reply  type 
is  used  to  call  one  of  four  major  subroutines:  0F(v_hFLY, 

CLS_RPLY,  TTY_fiDRPLY,  or  I0R_WR1TE. 

0PN_RPLY  is  called  when  an  1/0  open  reply  is  received. 

Receipt  of  an  open  reply  indicates  that  a terminal  has  become 
active.  0PN_RPLY  allocates  input  and  output  line  buffers  and 
issues  a non_blockln(r  read  to  the  terminal. 

CLS_RPLY  is  called  when  an  I/O  close  reply  is  received. 

CLS_RPLY  Initiates  the  removal  of  the  Connection  Manai^ement  block 
(CMb).  When  the  network  connection  is  closed,  the  CMb  is 
d ea 1 located . 

TTY_RDRPLY  is  called  when  an  I/O  read  reply  is  received. 
TTY_RDRPLY  calls  TTY_DATA  to  process  the  data,  performs  Reneral 
buffer  housekeeping,  and  issues  another  non-block  in?  read  call  to 
the  terminal.  TTY_DATA  .'cans  through  the  data  looking  for 
special  characters  or  THP  controls.  When  a complete  input  line 
is  received  (line  feed),  G0T_L1NE  is  called.  G01_LINE  calls 
PARSE_C0M  if  the  line  is  a local  THP  Module  co  mman  d { e . , open  a 

connection,  close  a connection,  etc.).  PARSE_C0M  calls  a command 
specific  subroutine.  Some  of  the  command  subroutines  call 
GEN_0PT  or  U_CTRL  to  put  THP  controls  into  the  to_net  queue. 

G0T_LINE  calls  SCAN_RCTE  if  any  data  is  to  be  sent  to  the 
network.  SCAN_RCIfc  implements  the  Remote  Control  Transmission 
and  Echoing  THP  control.  G0T_LINE  then  calls  a general  purpose  I 

subroutine  to  link  the  data  into  the  to_net  queue.  The  to_net 
queue  will  be  processed  by  the  T0_NET  subroutine. 


-25- 


I0R_WR1TE  la  called  when  a write  la  received  from  an  INF'E 
terminal.  It  deletea  the  written  charactera  from  the  terminal 
write  buffer. 


FROM  TCP  DAEMON 


THP  SUBROUTINE  CALLING  HIERARCHY  FROM  TCP  DAEMON 


From  TCP  Module  > The  From  TCP  Module  software  is  called 


I 

I 

9 

P 

I 


I 


when  an  I/O  reply  Is  received  from  the  TCP  Module.  The  reply  type 
is  used  to  call  one  of  five  subroutines:  0PN_RPL1,  CLS_RPLY , 
IOR_WRITE,  TCP_RDRPLY,  or  IOR_SPCL . 

OPN_RPLY  allocates  network  receive  and  transmit  buffers 
and  Issues  non-blocking  read  calls  to  the  TCP  Module. 


CLS  RPLY  is  described  above. 


The  IOR_WRITE  subroutine  is  called  when  a write  1/0  reply 
is  received  from  the  TCP  Module.  If  the  write  was  unsuccessful, 
the  connection  is  marked  as  closina.  The  write  buffer  is  put 
back  into  a free  pool. 


TCP_RDRPLY  is  called  when  a read  I/O  reply  is  received 
from  the  TCP  Module.  If  a partial  THP  header  has  previously  been 
received,  PARTIAL_SCAN  is  called.  PART1AL_SCAN  accumulates 
characters  until  a complete  THP  header  is  received.  When  a full 
header  is  received,  PR0C_REC  is  called.  If  there  is  a full  THP 
header  and  a partial  THP  data  record  previously  received, 
TCP_RDRPLY  calls  TH P_TO_INTERN AL  to  copy  complete  output  lines  to 
the  to_user  queue.  If  a full  THP  record  has  been  received, 
PR0C_REC  is  called.  PR0C_REC  uses  the  record  type  to  determine 
specific  processing.  If  the  record  is  a data  record, 
TH P_TO_INTERN AL  is  called.  If  the  record  is  a THP  control,  the 
specific  control  is  processed.  If  the  control  requires  a network 
response,  the  response  is  crested  and  queued  on  the  to_net  queue. 
If  the  control  requires  user  processing,  a control  message  is 
created  and  queued  on  the  to.user  queue. 


I 

I 

i 
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The  IOR_SPCL  subroutine  is  called  when  a special  I/O 
reply  is  received  from  the  TCP  Module.  If  the  special  request  was 
issued  in  response  to  a request  from  the  THP  Service  Module,  an 
1/0  special  reply  is  sent  to  the  ThP  Service  Module.  If  the 
reply  indicates  that  an  URGENT  Indication  has  been  received,  a 
flag  is  set  to  indicate  that  the  connection  should  be  put  into 
read  fast  mode.  The  connection  will  stay  in  read  fast  mode  until 
a end  of  urgent  indication  is  received  in  a read  reply. 
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THP  SUBROUTINE  CALLINING  HIERARCHY  FROM  THP  SERVICE 


From  TM P Ser vice  Module . The  From  THP  Service  software 


Is  called  when  an  I/O  request  Is  received  from  the  THP  Service 
Module.  The  request  type  is  used  to  call  one  of  five  major 
subroutines:  OPN_RE'0,  CLS_RE0 , 10_f(EAD,  IO_WRITE  or  IO_SPCL. 

The  0PN_RE0  subroutine  is  called  when  an  I/O  open  request 
is  received.  OPN_REQ  tries  to  allocate  a Connection  ManaRement 
Block  (CMb)  for  the  connection.  If  there  are  no  CMB's  available, 
an  I/O  reply  with  an  error  status  is  returned  to  the  THP  Service 
Module.  If  a CME  was  available,  it  is  initialized.  The  open 
request  is  linked  on  the  to_net  queue  to  be  sent  to  the  TCP 
Module. 


CLS_REQ  is  called  when  a close  1/0  request  is  received. 
CLS_REQ  checks  the  connection  state.  If  it  is  already  closed,  the 
close  request  is  sent  back  to  the  THP  Service  Module  with  an 
error  status.  Otherwise,  the  close  request  is  linked  on  the 
to_net  queue  to  be  passed  on  to  the  TCP  Module. 

I0_READ  is  called  when  a read  1/0  request  is  received.  If 
the  connection  is  closed,  or  if  the  number  of  allowable  reads  has 
been  exceeded,  an  I/O  reply  is  sent  to  the  THP  Service  Module 
with  an  error  status.  Otherwise,  the  request  is  linked  into  the 
to_user  queue. 

10_WR1TE  is  called  when  a write  1/0  request  is  received. 
If  the  connection  is  closed  or  if  the  maximum  number  of  writes 
has  been  exceeded,  an  1/0  reply  is  sent  to  the  THP  Service  Module 
with  an  error  status.  Otherwise,  the  request  is  put  on  the  to_net 
queue. 
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10_SPCL  is  called  when  an  1/0  special  request  is  received 
from  the  THF  Service  Module.  If  it  is  a status  request,  the  IHP 
Service  Module  request  is  used  to  create  an  I/O  special  request 
to  be  sent  to  the  TCP  Module.  If  the  special  request  asks  that  a 
specific  TH P control  be  sent,  the  control  is  linked  into  the 
to_net  queue  and  an  1/0  special  reply  is  sent  to  the  ThP  Service 
Module. 


subroutine  groups 


l£  User.  The  TO_USEh  subroutine  processes  the  to_user 


queue.  The  to_user  queue  contains  user  data  or  THE  controls. 
Entries  in  the  queue  are  processed  until  the  queue  is  emptied  or 
until  queue  element  processinR  must  be  delayed.  (Delay  occurs 
when  no  user  read  buffers  are  available.) 

If  the  entry  contains  user  data,  NET _D AT  A is  called. 
NET_DATA  copies  network  data  to  a per-user  line  buffer.  NET_DATA 
then  calls  01 V E_U SER_D AT  A . GIV E_USER_DATA  determines  if  the  user 
is  a terminal  or  the  THE  Service  Module.  If  the  user  is  an  I N E E 
terminal,  the  data  is  written  to  the  terminal.  If  the  user  is  an 
INEE  process,  the  data  is  copied  into  any  previously  received 
read  1/0  request  buffer(s).  NET_DATA  continues  this  process  until 
all  data  is  copied  to  a line  buffer,  or  the  line  buffer  is  full. 
In  either  case  NET_DATA  returns  to  T0_L'SER. 

If  a to_user  queue  entry  contains  a THr  option, 
NET_0PTI0N  is  called.  NET_0PTI0N  puts  the  option  in  a standard 
form.  NET_0PT10N  then  calls  an  option  specific  handling 
subroutine.  These  subroutines  perform  negotiation  based  on  the 
particular  option.  The  GEN_0PT  subroutine  is  called  when  a reply 
must  be  sent  to  the  negotiation.  GEN_0PT  formats  a network 
control  message  and  links  it  into  the  to_net  queue.  T0_USER  may 
call  GIVE  USEh_DATA  directly  if  data  was  left  in  the  per-user 
line  buffer  by  a previous  invocation  of  10_USEh. 

7s.  Net.  The  T0_N  ET  subroutine  processes  the  to_net 
queue.  The  to_net  queue  contains  user  data  or  THP  controls. 
En'  es  in  the  queue  are  processed  until  the  queue  empties  or 
until  processing  of  one  element  must  be  delayed;  usually  because 
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no  network  transmit  buffers  are  available.  11  the  entry  contains 
user  data,  THP_DATA_MSG  is  called.  If  the  entry  contains  a THP 
control  message,  THP_CTRL_MSG  Is  called.  If  a complete  write  I/O 
request  was  processed,  IO_RPLY  is  called  to  send  an  I/O  reply  to 
the  THP  Service  Module. 

THP_DATA_MSG  builds  a THP  data  record  in  the  current 
output  buffer.  If  the  data  record  fills  the  buffer,  NLW_XMn  is 
called  to  send  the  buffer  to  the  TCP  Module  and  to  locate  a new 
buffer.  If  a new  buffer  was  not  available,  the  copyinjr  is 
terminated  until  a new  buffer  is  available.  If  all  of  the  data 
was  copied  and  end-of -letter  was  set,  NEW_XM1T  is  called  to  write 
the  data  to  the  TCP  Module. 

THP_CThL_MSG  formats  a THP  control  message  in  the  current 
output  buffer.  If  there  is  not  enough  room  in  the  buffer  for  the 
message,  NEW_XMn  is  called. 

Remote  (Igcitrailfiil  Inanaaia^Lcii  aM 

Terminal  data  is  normally  echoed  by  the  UNIX  Terminal 
handler.  However,  when  a remote  THP  requests  the  hCTt  (remote 
controlled  transmission  and  echoing)  option,  the  1 h P Module  must 
perform  echoing  functions.  When  RCTE  is  in  effect,  terminal 
characters  are  copied  into  a local  echo  buffer  before  being 
linked  into  the  to_net  queue.  When  these  characters  are  to  be 
echoed  (echoing  is  initiated  by  an  RCTE  control),  characters  are 
copied  from  the  echo  buffer  into  the  terminal  line  buffer  and 
written  to  the  terminal. 

Host-T  er mi nal  Communlcati ona 
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Connections  between  INFt  terminals  and  the  host  are 


supported  by  the  THP  Module.  This  facility  iis  provided  without 
the  use  of  the  network  by  tyin^  tojrether  two  Connection 
hanafrement  blocks.  One  CMfa  simulates  a connection  between  the 
host  and  the  network.  The  other  CMb  simulates  a connection 
between  the  INKE  terminal  and  the  network.  both  the  host  and  the 
INlt  terminal  appear  to  have  a standard  network  connection. 

The  CMb's  are  tied  together  by  inserting  in  each  a 
pointer  to  the  other.  Data  from  each  source  is  inserted  into  the 
appropriate  C'o_net  queue  as  in  the  standard  case.  When  the  TO- 
N ET  routine  is  invoked,  it  notes  that  this  is  a special  case. 
Instead  of  writing  the  data  to  the  net,  it  shunts  the  data  from 
the  to_net  queue  to  the  to_user  queue  of  the  other  CMb.  The  data 
is  then  passed  to  the  recipient  in  the  usual  way. 


IM  DATA  STRUCTUHES 


The  format  of  a THP  Module  Connection  Mana  t^ement  block 
(CMb)  follows.  A Connection  Manajrement  block  is  allocated  for 
each  THP  connection.  Two  Connection  Manaf^ement  Mocks  are 
allocated  for  each  connection  between  an  INPE  terminal  and  the 
host  . 

struct  cmb 

i 


struct  cmb  *c_cmb_link;  / 
int  c_f Id  ; / 
i n t c_u s er i d ; / 

struct  q_ele  ‘c_to_user;  / 
struct  q_ele  ‘c_to_net;  / 
struct  q_ele  *c_net_bufs;  / 
struct  q_ele  ‘c_uread;  / 
char  c_nreads;  / 
char  c_nwrites;  / 
char  c_nstty;  / 
char  c_nct  rl ; / 
struct  q_ele  *c_sv_stty;  / 
struct  q_ele  ^c_sv_ctrl;  / 
int  c_t_mo  de [ 3 ] ; / 
int  c_rs_ln;  / 
int  c_rs_out;  / 
char  c_stf la^s ; / 
char  c_nsynch;  / 
char  c_nosynch;  / 
char  c_na  borts ; / 
char  c_state;  / 
char  c_aigfla<?;  / 
char  c_lcurs;  / 
char  c_ocurs ; / 
char  c_o p_f laRS [ 20  ] ; / 
char  c_nnenout;  / 
char  c_nnegin;  / 
char  c_lrcte;  / 
char  c_orcte;  / 
int  c_br_in;  / 
int  c_i xmit ; / 
int  c_br_out;  / 
int  c_o  xmit ; ' / 
char  c_in_lw;  / 
char  c_out_lw;  / 
char  c_ln_ps;  / 
char  c_out_ps ; / 


char  c_ln_v tabs [ NUM_TABS ] ; / 
char  c_ou t_v ta bs t NUM_T AbS ] ; 


used  to  link  toi^ether  cmb's  ‘/ 
TCP  file  id  •/ 
user  process  id  »/ 

user  data  4 ctl  queue 
net  data  4 ctl  queue 
free  net  write  buffs  */ 
user  read  descriptors 
nuro  of  c_ureads  */ 
outstanding  writes  from  user 
number  of  stty’s  outstanding  */ 
control  requests  out  */ 
user  sttys  ^ / 
user  ctl  requests  */ 
current  tty  mode 
approx  rec  size  for  input  */ 
approx  rec  size  for  output 
various  status  flags. 
outstandinK  synchs  */ 
synchs  in  output  stream  */ 
aborts  on  output  »/ 
the  state  of  the  connection.  */ 
required  activity  bits 
pos  of  the  cursor  on  input  */ 
pos  of  the  cursor  on  output  */ 
optn  negotiation  state 
unreplied  optn  negotiations  */ 
rcvd  option  negotiations  ‘/ 
rcte  echoing  flags  */ 
local  rcte  echoing  flags  ^ / 
break  classes  from  remote  thp 
trans  classes  from  remote  thp  */ 
break  classes  we  sent  them  */ 
trans  classes  we  sent  them 
input  line  width  •/ 
output  line  width  */ 
in  put  page  size  * / 
output  page  size  »/ 
input  vertical  tabstops  */ 

* output  vertical  tabstops 
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char 

c_i n_htabs[NUM_ 

TABS]  ;/ 

char 

c_out_htabs [ NUM 

_TABS]  ; 

char 

c_i dp_cr ; 

/* 

char 

c_odp_cr ; 

/* 

char 

c_idp_lf ; 

/* 

char 

c_odp_l f ; 

/fc 

char 

c_i dp_f  f ; 

char 

c_odp_f f ; 

/‘ 

char 

c_i dp_ht ; 

/k 

char 

G_odp_ht ; 

/• 

char 

c_i dp_vt ; 

/<- 

char 

c_odp_vt ; 

/*- 

char 

c_t  buf [ 6 ] ; 

/*■ 

char 

c_t  buf_p ; 

/* 

char 

c_h_par tia 1 ; 

/» 

i nt 

c_part_count ; 

/*■ 

char 

*c_tptr ; 

i nt 

c_t 1 en ; 

int 

c_t_f lags ; 

char 

c_tty_f i d ; 

/* 

char 

c_co  m_f lag; 

/*- 

char 

c_e li ne ; 

/* 

char 

c_erase ; 

/• 

char 

c_delete ; 

/* 

char 

c_i nter  r up  t ; 

/• 

char 

c_ao ; 

/*- 

char 

c_e  scape; 

char 

*c_pbuf ; 

char 

*'c_n x_p buf  ; 

char 

*c_f r_pbuf ; 

char 

*c_e_p  buf ; 

/* 

char 

‘c_ibuf ; 

/* 

char 

* c_e_i buf ; 

/* 

char 

*c_f r_i buf ; 

/* 

char 

c_rbuf [RBUF_S1ZE] ; /* 

char 

c_nx_rbuf ; 

char 

c_f  r_r buf ; 

/- 

* input  horiz,  tabstops 

output  horiz.  tabstops  */ 
input  or  disposition  */ 
output  or  disposition  */ 
input  If  disposition  */ 
output  If  disposition  »/ 
input  ff  disposition  */ 
output  ff  disposition  */ 
input  ht  disposition  */ 
output  ht  disposition 
input  vt  disposition  */ 
output  vt  disposition  •/ 
temp  record  header  Iocs  */ 
next  c_tbuf  slot  »/ 
required  header  chars  */ 
bytes  left  in  this  record  *■/ 
temp  record  storage 
length  of  the  above  buffer 
tty  interface  flags  */ 
tty  file  id  */ 
command  flag  character  *■  / 
end-line  character  */ 
the  erase  character  */ 
the  delete  character 
the  interrupt  character  */ 
the  abort  output  character  */ 
the  literal  escape  character  *■ 
pointer  to  line  buffer  */ 
next  pbuf  character  */ 

Next  free  character  in  pbuf  •■/ 
addr  of  curr  end  of  line  buff 
tty  rea  d buffer 
the  end  of  the  c_ibuf  •■  / 
next  char  position  »/ 

RCTE  echo  storage  */ 

nxt  c_rbuf  char  to  echo  ‘/ 

past  last  echo  char  */ 
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The  following  is  a list  of  the  major  THP  subroutines. 


cl s_req 

handles  a close  io  message  from  the  service, 
cl s_r p ly 

Handles  a close  reply  from  the  TCP  Module  or  a user  tty. 
io_read 

Handles  a read  request  from  the  service. 
io_write 

Handles  a write  request  from  the  service, 
i or_r  ea  d 

Handles  a read  reply  from  the  TCP  Module  or  a user  tty. 
i or_wr i t e 

Handles  a write  reply  from  the  TCP  Module  or  a user  tty. 
net_data 

Processes  data  elements  from  the  to-user  queue.  It  copies 

data  into  the  line  buffer  from  where  it  is  passed  to  the 

s er vi ce  or  tty . 


net_opti on 

Processes  option  elements  from 
the  option  for  validity,  makes 
of  options,  and  initiates  any 
Much  of  the  work  on  individual 
filter  routines,  most  of  which 


the  to-user  queue.  It  checks 
changes  to  the  current  state 
appropriate  response  options, 
options  are  done  by  external 
have  not  been  written. 


opn_req 

Handles  an  open  request  from  the  service, 
opn-rply 

Handles  an  open  reply  from  the  TCP  Module  or  a user’s  tty. 
scan_rcte 

When  the  RCTE  (Remote  Controlled  Echoing)  option  is  in 
effect,  this  routine  is  called  to  handle  echoing  of  data 
typed  by  the  user. 

tcp_rdrp ly 

This  routine  (together  with  routines  it  calls)  scans  buffers 
from  the  net  and  puts  appropriate  data  and  control  messages 
into  the  to-user  queue. 


thp 

This  is  the  main  routine.  It  performs  initialization, 
forwards  io  messages  to  the  appropriate  routines  for 
processing,  and  calls  to-user  and  to-net  when  appropriate. 


thp_ctrl_n)Sg 

Formats  a THP  control  record  into  the  current  transmit 
buff  er . 

thp_data_msg 

Formats  a THF  data  record  into  the  current  transmit  buffer. 
thp_to_internal 

This  routine  scans  data  received  from  the  net  for  CR-Li 
sequences,  and  puts  data  messages  into  the  to-user  queue. 

to_net 

This  is  the  routine  that  reads  the  to-net  queue.  It  calls 
thp_ctrl_msg  and  thp_data_msg  to  format  transmit  buffers, 
and  writes  them  to  the  TCP  Module. 

to_us  e r 

This  routine  reads  the  to-user  queue.  Options  are  checked 
for  validity  and  responses  generated.  Data  is  passed  to  the 
user . 

tty_data 

This  routine  actually  looks  at  data  typed  on  a user  tty. 
The  routine  checks  for  special  characters,  and  calls 
got_line  when  a line  has  been  typed. 

tty_rdrp ly 

This  handles  a read  reply  from  a user  tty.  Data  is  passed 
) to  tty_data. 


I 

I 

i 
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TCP  CALLING  HIERARCHY 


The  following  is  a subroutine  calling  hierarchy  for  the 


TCP  Module. 
Module. 

This  list 

contains  all  of  the  subroutines  in  the  TCP 

a bo  r t 

calls 

cancel,  mvq , reply,  rlse_rcv,  vdeq 

a ck 

calls 

cancel,  difl,  log,  mvq,  panic,  sndreply 

assemble 

calls 

diff,  insert,  last_buf , log,  sadd,  to_user 

b_a  ck 

calls 

checksum,  get_buf,  panic,  send,  venq 

bld_assm 

calls 

deq,  iomap,  log,  panic 

bi  pkt 

calls 

checksum,  d_opt_lg,  diff,  enable,  /7et_buf  , 
panic,  window,  log,  mv_data 

bye 

calls 

pa  ni  c 

checksum 

calls 

cksum 

cksum 

calls 

onecadd 

combine 

calls 

enq  , merge 

d_ack_att 

calls 

diff 

d_o  p ti  on  s 

calls 

log,  printf 

d_seq_att 

calls 

diff,  log,  panic,  sadd 

enable 

calls 

activate,  panic,  time 

f ree_b  uf 

calls 

panic,  venq 

get_buf 

calls 

vdeq 

get  c 

calls 

iomap , panic 

i nl  t 

calls 

enq,  getpid,  ioaddr,  open,  p_open,  panic, 
si gna 1 , venq 

1 ni t_rea  d 

calls 

free_buf,  get_buf , log,  p_read,  venq 

insert 

calls 

bld_assm,  combine,  panic,  3v_buf 

1 s n 

calls 

window 

la3t_buf 

calls 

mvq,  panic,  rdreply 

log 

calls 

ctlme,  printf,  time 

log_a 1 1 

calls 

log_gbl,  log_qs,  log_tcb 
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log_gb 1 

calls 

p ri n tf 

log_opn 

calls 

printf 

log_pkt 

calls 

printf 

log_qs 

calls 

printf 

log_tc  b 

calls 

printf 

Dial  n 

calls 

exit,  free_buf,  init,  iowait,  log,  netin, 
p_openr,  panic,  send,  u_event,  U3er_in,  vdeq 

merge 

calls 

enq,  panic 

mv_d  at  a 

calls 

diff,  lomap,  panic,  sadd 

mvq 

calls 

deq , enq 

n_c lo  s ed 

calls 

b_ack,  loK 

n_c losing 

calls 

a bor t , a ck 

n_c 1 s_w  t 

calls 

ack,  assemble,  panic,  reset,  send 

n_es  ta  b 

calls 

ack,  assemble,  printf,  reset,  rlse_rcv, 
sadd,  send 

n_f 1 n_w  ait 

calls 

abort,  ack,  assemble,  log,  panic,  reset, 
send 

n_  1 1 3 ten 

calls 

assemble,  b_ack,  isn,  log,  send 

n_syn_rc vd 

calls 

assemble,  b_ack,  log,  opreply,  reset,  send 

n_sy n_3ent 

calls 

ack,  assemble,  b_ack,  opreply,  reset,  send 

ne  1 1 n 

calls 

(unknown),  checksum,  d_ack_att,  d_opt_lg, 
d_seq_att,  init_read,  log,  net_securlty , 
p_scan,  panic,  vdeq,  d_options,  net_tcb 

num 

calls 

get  c 

opara  m 

calls 

any,  getc,  log,  match,  num 

op  rep ly 

calls 

ioreply,  vdeq 

panic 

calls 

lot,  log,  log_all,  printf 

r d rep ly 

calls 

ioreply 

re  ply 

calls 

ioreply 

reset 

calls 

abort,  Isn,  panic,  send 
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rlse_rc V 

calls 

mvq , reply 

send 

calls 

bld_pkt,  to_net,  vdeq 

s hu  f f le 

calls 

mvq 

s ndre  p ly 

calls 

lore  ply 

s v_b  uf 

calls 

panl c , venq 

te vent 

calls 

activate,  time,  timeout 

timeout 

calls 

a Port , send 

to_ne  t 

calls 

p_write  ^ 

t o_u  s er 

calls 

diff,  mvq,  panic,  rdreply,  sadd,  shuffle 

u_a  Port 

calls 

abort,  panic,  reply,  send 

u_c lose 

calls 

abort,  panic,  reply,  send 

u_  rea  d 

calls 

mvq,  netin,  panic,  reply 

u_s  en  d 

calls 

mvq,  panic,  reply,  sadd,  send 

u_specia  1 

calls 

panic,  reply 

u_stat  us 

calls 

iomap,  panic,  reply 

u_s  tty 

calls 

reply 

user_i n 

calls 

(unknown),  loi?,  oparam,  open_itt,  opreply, 
reply,  u_security,  venq,  panic 

vd  eq 

calls 

mvq 

ven  q 

calls 

mvq , pani c 

i 

I 


I 
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NAME  : 

a ck 

FUNCTION  : 

see  what  has  been  acked  and  process  it 
ALGORITHM: 

if  ack  attribute  in  not  ok 
r etu  rn 

get  the  difference  between  the  packet  seq  and  the  send  seq 

copy  the  packet  sequence  into  the  send  sequence 
copy  the  window  from  the  packet 

if  a SYN  was  acked 

reset  the  SYN  bit 

decrement  the  number  of  sequence  numbers  acked 

if  a FIN  was  acked 

reset  the  FIN  bit 
set  FIN_ACKED 

decrement  the  number  of  sequence  numbers  acked 

if  sequence  number  acked  is  zero 
return 

if  it  is  negative 
log  it 
return 

if  the  URGNET  was  acked 

reset  the  send  urgent  bit 

for  ever  --  release  acked  buffers 
if  the  send  q is  empty 
panic 

point  at  the  first  one 

decrement  seq_nums  by  the  segments  loeical  length 

if  seq  nums  >=  0 (acked  the  whole  thing) 

increment  bytes  acked  by  its  physical  length 
move  the  buffer  descriptor  to  the  free  queue 
generate  a reply  for  the  buffer 
else  partial  ack 

add  the  logical  length  to  seq_nums 
add  seq_nums  to  physical  bytes  acked 
if  seq_nums  is  zero 
break 

update  the  send  buf  descriptor  -- 
reset  the  EOL  bit  in  flags 
increment  offset  by  seq_nums 
decrement  log_len  by  seq_num3 
decrement  physical  length  by  seq_nums 


-4k- 


if  physical  length  is  less  than  zero 
panic 

break 

decrement  out  by  number  physical  bytes  acked 
decrement  number  q'd  to  go  by  physical  bytes  acked 

FARAMETEkS: 

tcb  ptr 
pack  et  ptr 


RETURNS: 

nothing 

GLOBALS: 

none 

CALLS: 

panic 
and  rep ly 
mvq 

CALLED  BY  : 

n_s  y n_s  en  t 
n_es  ta  b 
n_Mn_wal  t 
n_cl s_w  t 
n_c losing 


HISTORY : 

Initial  coding  3/8/76  by  David  Healy  of  DTI 
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until  processina  of  one  element  must  be  delayed;  usually 
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NAME  : 

assemble 
FUNCTION : 

first  step  in  ^IvinK  data  to  the  user 

ALGORITHM: 

if  seq_att  is  DUP 
return 

switch  on  tp  ->  t_state 
CLOSED 

re  t u rn 

case  LISTEN 
case  syN_SENT 

if  seq_att  is  not  IN_SEQ 
break ; 

if  we  aot  a syn, 

increment  a rev  sequence  number 

break ; 

case  SyN_RCVD 
break; 

case  CLOSE_WAIT 
case  CLOSING 

if  pkt  seq  is  > rev  seq 

log  data  after  FIN 

break 

case  ESTABLISHED 
insert 
to_us  er 

if  there  is  a fin  and  all  data  has  been  dive 
to  the  user 

mark  FIN_RCVD 

break 

PARAMETERS: 

. a t cb  ptr 

a packet  ptr 


RETURNS: 

nothing 

GLOBALS: 

seq_at  t 

CALLS: 

di  f f 
log 

insert 
to_  user 
last_buf 


because 
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CALLED  BY: 

n_li3ten 
n_3yn_aent 
n_3yn_rc  vd 
n_e3  ta  b 

n_f ln_wai t 
n_cl3_walt 

HISTORY : 

initial  coding  3/6/76  by  David  Healy  of  DTI 


NAME  : 


checksum 


FUNCTION : 

checksum  a packet 

ALGOhITHh: 

checksum  the  Internet  header 
checksum  the  tcp  header 
if  there  are  any  options 

while  there  is  option  data 

compute  number  of  checksumed  bytes 
checksum  them 

skip  over  unchecksumed  option  bytes 
if  there  is  any  data  left  in  the  packet 
checksum  it 

if  the  checksum  is  not  zero 
ones  compliment  it 

PAhAMETEHS: 

ai np  a packet  ptr 

RETUENS; 

checksum 

GLOfaALS : 

none 


CALLS: 

ck  su  m 

CALLED  EY: 

ne  t i n 

HISTORY  : 

initial  codln<f  i/b/11  by  David  Healy  of  DTI 


NAME  : 


NAME  : 


d_s  eq_at  t 


FUNCTION  : 

determine  the  attributes  of  the  packet  sequence  -- 
IN_SE0  --  packet  seq  is  the  same  as  rev  seq 
1N.,WIN  --  some  part  of  the  packet  is  in  our  window 
DUF  --  none  of  the  above 
if  part  of  the  sequence  numbers  are  duplicate 

adjust  packet  seq  to  make  it  look  in  sequence 
adjust  data_lg  and  data_off 
reset  duplicate  controls 
adjust  the  urgent  offset  number 
reset  the  urgent  if  its  now  negative 
set  dup_num  to  the  amount  the  packet  is  out  of  sequence 


ALGOFITHM: 

compute  the  difference  between  the  rev  seq  and  pkt  seq 
if  it  is  zero 

seq_att  = 1N_SE0 

else 

if  the  window  edge  is  >=  pkt  seq  and  if 
the  pkt  edge  is  >=  rev  seq 
if  duplicate  stuff 

seq_att  = IN_SE0  --  it  will  be 
adjust  pkt  seq 
adjust  pkt  urg  offset 
if  negative  reset  pkt  urg  bit 
if  pkt  SYN 

reset  it 

dec  Ctrl  Ig  and  num  dup 
if  num  dup  still  > 0 
reset  pkt  BOL 

decrement  data_lg  by  num  duplicate 
increment  data_off  by  num  duplicate 
num  duplicate  = 0 


else 


seq_add  = 1N_WIND0W 


dup_num 


else 

seq_att  = DUF 
= num  duplicates 


PARAMETERS: 

teb  ptr 
pkt  ptr 


RETURNS: 

nothing 

GLOBALS  : 

seq_at  t 
data_lg 
dat  a_o  f f 
ctrl_lg 
dup_num 


-50 


CALLS  : 


dlf  f 

log 

panic 


NAME  : 


d_o  p ti on  s 


FUNCTION : 

process  the  options  in  the  tcp  header 
ALGOHITHM; 

if  there  aren't  any  return 

point  at  the  beginning  of  the  options 

for  ever 

fliet  the  next  option  byte 

switch  on  the  option 
CASE  bUFSIZ 

copy  the  buffer  size  into  the  tcb 
increment  option  byte  counter 
point  at  the  next  option 
continue 

CASE  0_END 

increment  the  option  byte  counter 
return  the  number  of  option  bytes 

CASE  0_PAD 

increment  the  option  byte  counter 
continue 

DEFAULT 

get  the  option  length 
increment  the  option  byte  counter 
point  at  the  next  option 
continue 

PARAMETERS: 

tcb  ptr 
packet  ptr 

RETURNS: 

number  of  option  bytes 

GLOBALS : 

CALLS: 

log 

CALLED  BY: 

ne  t i n 

HISTORY  : 

initial  coding  3/6/77  by  David  Healy  of  DTI 


NAME 


Inlt 


FUNCTION : 


Initialize  queues  and  open  the  net  and  daemon  file 


ALGORITHM: 

f inlt  the  following  queues 

FR_1DQ 

FR_RCV0 

[ FR_SND0 

FR_BUFO 

1 FR_ASSM0 


get  a ioport 

p_open  to  open  the  net 

open  the  top  daemon  file 

PARAMETERS: 

none 

RETURNS: 

nothing 


GLOBALS : 

Idqs 
rc  vq  s 
s ndq  s 
assms 
buf 

FR_RCVO 

FR_SND0 

FR_IDQ 

FR_ASSMQ 

FR_BUFQ 

mypl  d 
s egbas  e 
tcpdaemon 


CALLS: 

enq 

getpld 
1 oa  dd  r 
p_open 
open 
panl  c 

CALLED  BY: 

mai  n 

HISTORY : 

initial  coding  3/8/77  by  David  Healy  of  Dll 
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NAME  : 

mal  n 

FUNCTION : 

call  init  to  have  things  initialized 
provide  the  driving  loop  for  the  program 

ALGOfilThM: 

call  init  to  have  things  initialized 


for  ever 

wait  for  an  io  event 

call  the  appropriate  routine 


F ARAMETEftS: 

none 

RETURNS : 

ne  ver 

GLOfeALS : 

event 
rep  lyi d 

CALLS : 

init  initialize  things 
low  ait  wait  for  an  io  event 
u_event  handle  events  from  users 
user_ln  handle  io  requests  from  users 
p_openr  psip  open  response  handler 
loff  log  stuff 

netin  handle  network  read  completes 
mvq  move  from  one  q to  another 

CALLED  BY : 

no  one 

HISTORY : 

initial  codinn  l/b/11  hy  David  Healy  of  Dll 


NAME  : 


ne  1 1 n 


I 


f UNCTION: 

first  level  handling  of  a network  message 
ALGOHITHM: 

If  a buffer  was  not  specified 

get  one  from  the  net  read  queue 
decrement  number  of  reads  outstanding 


If  p_scan  says  it  Is  not  lor  us  to  look  at 
log  that 

else 

If  the  checksum  is  not  correct 
log  that 

else 


compu  te 

Internet  header  length 
tcp  header  length 
number  tcp  option  bytes 
number  of  data  bytes 


set  ptrs  to  the  internet  and  tcp  headers 
find  the  tcb  associated  with  the  packet 


if  net_securlty  fails 
log  that 


else 


count  num  seq  consuminK  ctls 
set  seq  len  consumed  (seq_lg)  to 
num  data  bytes+ctls. 

determine  sequence  and  ack  attributes 
call  state  dependent  code 
start  up  another  network  read 

P ARAMETEhS: 

bufp  or  0 


RETURNS : 

nothing 

GLObALS: 

net  reads 
cur_buf 
i np_h Ig 
pkt_h Ig 
data_lg 
cur_inp 
cu  r_pp 
ctr l_lg 
seq_lg 
d a ta_o  f f 


number  of  netword  reads  outstanding 

current  buf 1 er 

Internet  header  length 

tcp  header  length 

number  of  data  bytes 

pointer  to  Internet  header 

pointer  to  tcb  header 

number  to  tcp  controls  that  consume  seq  nums 
length  of  packet  In  sequence  numbers 
offset  from  the  tcb  header  to  the  data 
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CALLS  : 


P 


vdeq 
p_3  can 

checksum 
net_tcb 
ne  t_s  ecurit  y 
d_opt_lg 
d_s  eq_a  1 1 
d_a  ck_at  t 
{*  n_f  u nc ) ( ) 
log 

CALLED  BIT: 

main 

HISTOBY  : 

Initial  coding  3/b/77  by  David  Mealy  of  DTI 


! 

I 


I 


NAME : 


ne  t_3  ecurit  y 


FUNCTION : 

screen  incoming  packets  for  correct  security  levels 
and  adjust  the  TCB  send  levels  if  appropriate. 

if  the  Incoming  packet  does  not  match  an  active  TCb, 
attempt  to  bind  it  to  an  incomplete  one. 


ALGORITHM : 

If  the  tcb  pointer  is  NULL, 

call  PKTbIND  and  return  whatever  he  returns 


If  packet  TCC  and  TCB  TCC  don't  match, 
return  -1 


If  packet  security  level  is  out  of  send  ranee, 
retu  rn  - 1 


If  packet  precedence  is  out  of  ran?e, 

set  send  precedence  against  the  stops 

else 


set  send  precedence  to  that  of  packet 


I 


PARAMETERS; 

pktp  - pointer  to  packet 

tcbp  - pointer  to  TCB  packet  came  on 


RETURNS: 

0 - if  everythlnn  matches  ok 

-1  - if  the  packeu  is  bad 


GLOBALS: 

none 


CALLS: 

pk  t bi nd 


CALLED  BY: 


HISTORY  : 

initial  coding 
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NAME : 


n_closed 
FUNCTION : 

handle  a network  packet  with  tcb  in  the  closed  state 


ALGORl  ThM: 

if  he  sent  us  a reset 
log  it 

else 

send  him  a believable  reset 

PARAMETERS : 

tcb  p t r 
packet  ptr 


RETU  RNS : 

no  th 1 n d 

GLObALS: 

none 

CALLS: 


log 
b a ck 


CALLED  bl : 

ne  t i n 


HISTORT  : 

initial  coding  3/fe/78  by  David  Healy  of  DTI 
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NAME  : 

n_cl osing 
FUNCTION  : 

handle  a packet  when  we  are  waitini?  for  our  fin  to  be  acked 
ALGORITHM: 

if  it  is  a duplicate  packet 
retu  rn 

see  what  he  acked 
if  he  acked  our  fin 

abort  the  connection 

PARAMETERS: 

tcb  ptr 
packet  ptr 

RETURNS: 

no  th  i n a: 

GLOHALS : 

none 

CALLS: 

a ck 
abort 

CALLED  BY: 

ne  t i n 

HISTORY  : 

initial  coding  3/fa/7b  by  David  Healy  of  DTI 
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N AME  : 


n_c 1 3_wai t 
(•UNCTION  : 

handle  a packet  when  we  are  in  the  close_walt  state 
ALGOhlTHM: 

it  the  packet  length  is  non  zero 
remember  it 
i t s eq_a 1 1 is  DU P 

see  what  we  should  send 
retu  rn 

if  no  ack  bit 
panic 

see  what  he  a eked 
if  we  got  a reset 
reset  us 
re  t u rn 

see  what  he  gave  us 
send  what  we  can 

p ARAMETE[<S: 

teb  ptr 
packet  ptr 


HETUI^NS: 

nothing 


GLOBALS : 

none 

CALLS: 

send 

panic 

ack 

reset 

assemble 

CALLED  BY  : 

ne  t i n 

HISTORY  : 

initial  coding  3/b/78  by  David  Healy  of  DTI 
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NAME : 


n_esta  b 

FUNCTION : 

handle  a packet  when  we  are  In  the  established  state 

ALGORITHM: 

if  the  packet  len<?th  is  non  zero 
remember  it 

if  the  sequence  attribute  is  DUP 
send  what  we  can 
re  t u rn 

if  ack  attribute  is  none 
lOR  it 
return 

if  ack  attribute  is  ok 

see  wha  the  acked 
if  we  Rot  a reset 
reset  us 
re  t u rn 

if  we  jrot  an  urgent 

remember  the  sequence  number  of  the  last  urgent  byte 
if  we  aren'  currently  in  urgent 
tell  the  user 
mark  it 

see  what  we  got  in  the  way  of  data 

if  we  got  a fin  in  sequence 

release  all  rev  buffers 
state  to  closing 
see  what  we  can  send 

PARAMETERS : 

teb  ptr 
packet  ptr 

RETURNS: 

nothing 

GLOEALS: 

none 

CALLS: 

re  set 
send 
a ck 

assemble 
r 1 se_rc V 

CALLED  BT: 

ne  t i n 

HISTORY  : 

initial  coding  3/b/7b  by  David  Healy  of  DTI 
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NAME. 


n_l in_wai t 
FUNCTION : 

handle  a packet  when  we  are  in  the  fln_walt  state 
ALGOhITHM: 

if  packet  lenjfth  is  non  zero 
remember  it 

is  seq_att  is  DUP 

see  what  we  can  send 
retu  rn 

if  no  ack  bit 
panic 

if  duplicate  ack 
log  it 

see  what  he  acked 

if  we  got  a reset 
reset  us 
re  t u rn 

if  we  got  a FIN 

remember  it 

process  what  he  gave  us 

if  the  fin  has  been  given  to  the  user 
if  our  fin  hasn't  been  acked 
state  to  CLOSING 

else 

abort  the  connection 
return 

see  what  we  can  send 

PARAMETEhS; 

tcb  ptr 

packet  ptr 


k 


RETU  RNS : 

nothing 

GLOBALS: 

none 

CALLS: 

send 
log 
pani  c 
ack 

assemble 
reset 
a bor  t 

CALLED  BY: 

ne  t i n 
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HISTORK  : 


initial  coding  3/b/7b  by  David  Healy  of  DTI 


! 


NAME : 


n_l isten 
FUNGI  ION : 

handle  a network  when  we  are  in  the  listen  state 


ALGORITHM: 

i f 


he  sent  us  an  ack  (no  Rood) 
If  we  got  a reset 
lOR  it 


else 

send  a believable  reset 

retu  rn 


if  we  got  a reset 
lOK  it 


else 

if  we  ROt  a SYN  (Rood  news) 

copy  packet  sequence  and  window 

select  an  isn 

send  a SYN/ACK 

state  to  SYN_RCVL) 

process  what  we  got 


PARAMETERS : 

tcb  ptr 
packet  ptr 


RETURNS  : 

nothing 

GLOfaALS: 

none 

CALLS: 

log 
b_a  ck 
assemble 
send 

CALLED  BY  : 

ne  t i n 

HISTORY  : 

initial  coding  3/b/Tb  by  David  Healy 
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NAME  : 


n_s  y n_rc  vd 
FUNCTION  : 

handle  a packet  when  we  are  in  the  syn_rcvd  state 


ALGORITHM: 

is  the  packet  a duplicate 
did  we  get  a reset 
reset  us 


else 


did  we  get  an  ack 

send  a believable 
reset  us 


return 


reset 


if  the  ack  attribute  is  not  ok 

if  we  didn't  get  a reset 

send  a believable  reset 


else 


reset  us 


if  we  got  a reset 
reset  us 

else 


if  we  got  a SYN  --  weird  Indeed 
log  it 

else 

see  what  we  got 
state  to  ESTABLISHED 
reply  to  any  q'd  opens 
send  an  ACK 


PARAMETERS : 

tcb  ptr 
packet  ptr 

RETURNS: 

nothing 

GLOBALS: 

none 

CALLS: 

re  s et 

b_a  ck 

assemble 

send 

opreply 

log 

CALLED  BY  : 

netin 

HISTORY  : 

initial  coding  3/8/7b  by  David  Healy  of  DTI 
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NAME: 

n_s  y n_s  en  t 
FUNCTION : 

handle  a packet  when  we  are  in  the  syn_sent  state 

ALGORITHM: 

did  we  Ret  an  ack 

it  ack_att  is  not  OK  (BAD  indeed) 
send  a believable  reset 
re  t u rn 

if  we  ROt  a reset  (start  over) 
reset  us 
re  t u rn 

else 

see  what  he  a eked 


if  we  Rot  a syn 

copy  packet  sequence  into  our  rev  sequence 
copy  window  into  our  rev  window 
see  what  he  acked 
if  he  didn't  ack  the  fin  (rats) 
state  to  SYN_RCV0 

else 

state  to  ESTABLISHED 
reply  to  any  q’d  opens 
send  an  ack 

else 

send  a believable  reset 
reset  us 

PARAMETERS: 

teb  ptr 
packet  ptr 

RETURNS: 

no  th i nR 

GLOBALS : 

none 

CALLS: 

b_ack 

reset 

op  re  p ly 

assemble 

send 

ack 

CALLED  B'i  : 

net  In 

HISTORY  : 

Initial  coding  by  David  Healy  of  DTI 
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NAME  : 


opara  m 


FUNCTION  : 

parse  the  open  parameters 
ALGORITHM: 

set  op_ofr8et  and  op_left  to  0 
initialize  the  open  parameter  struct 
for  ever 

skip  over  leadinfi  delimiters 
copy  the  next  parm  into  a string 
see  if  it  matches  anything  we  know  about 
if  index  >=  0 and  if  ar gs [ index  ]. flags  ==  expected 
get  the  number 


switch  on  index 

log  bad  parm 
retu  rn  - 1 


case  0_FP0HT 

copy  the  1 gn  port  into  open  parm  struct 
contin J e 

case  0_LP0RT 

copy  the  local  port  into  open  parm  struct 
continue 

case  0_FTCP 

copy  the  fgn  tcb  into  open  parm  struct 
continue 


case  0_FNET 

copy  the  fgn  net  id  into  open  parm  struct 
continu  e 


case  0_BUF 

copy  the  buffer  size  into  open  parm  struct 
continue 


default 

or  the  arg. flags  into  open  parm  struct 
continue 


PARAMETERS: 

none 


RETURNS: 

- 1 if  bad  parm 
1 If  successful 


GLOBALS: 

the  open  parameter  struct 


67- 


CALLS : 


CALLED 

HISTOHK 


t 


t 


Ret  c 
any 
mat  ch 
num 
lOR 

h'i  : 

userin 


initial  coding  l/b/lb  by  David  Healy  of  DTI 
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NAME  : 


re  set 


FUNCTION : 

reset  the  tob 


ALGORITHM: 

switch  on  the  tcb  state 

case  CLOSED 

ret  u rn 


case  LISTEN,  SYN_SENT,  SYN_RCVD 
if  init  wanted 

select  an  isn 

set  the  SYN  control  bit 

send  a packet 

set  the  state  to  SYN_SENT 


else 


default 

a bo  r t 


set  the  state  to 
the  connection 


LISTEN 


PARAMETERS: 

tcb  ptr 

, RETURNS: 

notning 

GLOBALS: 

none 

CALLS: 

panic 

send 

CALLED  BY: 

n_syn_sent 
n_sy n_rc  vd 
n_e  sta  b 
n_cl08e_walt 
n_f  ln_wal  t 

! 

; HISTORY: 

I initial  coding  3/7/7U  by  David  Healy  of  DTI 


1 

i 
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N AME  : 


send 


FUNCTION : 

decide  what  to  send  to  the  net 
ALGORITHM: 

while  number  netwrite  outstanding  is  less  that  max  allowed 
if  a tcb  was  specified 

if  all  user  data  has  been  send  and  there 
are  not  controls  to  send 
reset  tcb  was  specified 


if  no  tcb  was  specified 

if  something  on  the  believable  queue 
if  to_net  successful 
continue 

else 


break 


find  the  most  deserving  tcb 
il  none 

re  t u rn 

if  to_net  (bld_pkt  (the  selected  tcb))  fails 
break 

reset  tcb  was  specified 


PARAMETERS; 

a tcb  ptr  or 
0 

RETURNS: 

nothing 

GLOBALS: 

netwrltes 

BLVO 


CALLS: 

vdeq 
to_net 
bl d_pk  t 

CALLED  bl : 

mal  n 

n_l i sten 
n_syn_sent 
n_sy n_rc  vd 
n_e8tab 
n_f ln_wa it 
n_c 1 a_wai  t 
reset 
b_a  ck 
u close 


70 


1 


1 

I 


u_a  bort 
u_8  en  d 

HISTORY : 

Initial  coding  'i/b/1%  by  David  Healy  of  DTI 


NAME  : 


to_net 

FUNCTION:  ■< 

write  a buffer  to  the  net 

ALGORITHM: 

point  at  the  internet  header 

p_write  (bufp,  packet  length  + local  network  pad) 
i f su ccessf u 1 

increment  netwrites 
return  1 

else 

return  0 


PARAMETERS : 

buf  fer 


Ptr  j 


RETURNS: 

1 if  successful 
0 if  not 


GLOBALS: 


netwrites 

CALLS: 

p_wr it  e 

CALLED  : 

send 

HISTORY  : 

initial  coding  3/7/78  by  David  Healy  of  DTI 
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NAME  : 


to_user 
FUNCTION  : 

give  the  user  completed  buffers 
ALGORITHM; 

thru  the  rev  buffers 

point  at  the  frag  descriptor 
If  none 

break ; 

point  at  the  oldest  one 

If  the  fragment  offset  Is  zero  and  If 

fragment  length  matches  rev  buf  length 
or  fragment  EOL 

copy  the  fragment  length  into  the  buff  desc 
do  rubber-EOL  stuff 
free  the  fragment  descriptor 
r d rep ly 

free  the  rev  buf  descriptor 

else 

if  frag  offset  = 0 

left  = frag  length 
seq  nums  r+  frag  length 

break; 

if  consumed  sequence  numbers 

increment  the  rev  seq  by  seq  nums  - already  acked 
already  acked  = left 

if  user  was  in  urgent  mode  and  he  no  longer  is 
reset  the  urgent  bit 

PARAMETERS: 

teb  ptr 

RETURNS: 

nothing 

GLOBALS: 

FR_RCV0 

CALLS : 

shuffle 
panic 
rdre  ply 
mvq 

CALLED  BY; 

assemble 

HISTORY : 

initial  coding  3/fa/78  by  David  Healy  of  DTI 
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NAME : 


U3er_ln 


FUNCT  ION  : 

first  level  handling  of  a user  request 


ALGORITHM: 

if  its 


ar  open 

«ret  the  open  params 
open_i t 

if  get  a tcb  ptr  back 

q the  open  replyid  id 
if  state  is  established 
opreply 


else 


reply  with  an  error 

retu  rn 


check  the  daemon  id  over 
get  a tcb  ptr 
if  the  state  is  closed 
panic 

the  the  security  is  bad 

reply  with  an  error 
log  it 
retu  rn 

call  the  appropriate  user  routine 

PARAMETERS: 

none 


RETURNS : 

nothing 

GLOBALS: 

tcbs 

event 

( *'  u_f  u nc  ) ( ) 

CALLS : 

opara  m 
open_it 
ven  q 
i oreply 
re  ply 
panic 

u_s  ecurlt  y 
log 

( * u_f  u nc  ) ( t p ) 

CALLED  BY: 

mal  n 

HISTORY  : 


-1^- 
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NAME  : 


I 

1 

I 

I 

i 


( 

1 


I 


u_a  bort 

FUNCTION  : 

handle  user  request  to  abort  a connection 

ALGORITHM: 

switch  on  the  state 

case  CLOSED 

panic  --  impossible 
case  LISTEN 
case  SYN_SENT 

abort  WAS_RESET 
reply  SUCCESS 
break ; 

default 

decrement  number  open 

case  SYN_RCVD 

send  a reset 
abort  WAS_RESET 
reply  success 

FARAMETERS : 

tcb  ptr 

RETURNS: 

nothing 

GLOBALS: 

re  p ly i d 

CALLS: 

abort 
send 
re  ply 

CALLED  BY: 

us  er i n 

HISTORY : 

initial  coding  3/fa/78  by  David  Healy  of  DTI 
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NAME  : 


u_close 
FUNCTION : 

handles  a users  close  request 
ALGORITHM: 

decrement  the  number  of  users  that  have  It  open 
If  > 0 

reply  SUCCESS 
return 

switch  on  the  tcb  state 
CASE  CLOSED 

panic 

case  LISTEN 
case  SYN_SENT 

abort  it 
reply  success 
break 

case  SYN_RCVD 
case  CLOSE_WAIT 

send  a fin 

set  the  state  to  CLOSING 
save  the  replyid 

case  ESTAfa 

I send  a fin 

set  the  state  to  FIN_WA1T 
save  the  replyid 

case  FIN_V(AIT 
case  CLOSING 

panic  impossible 

PARAMETERS: 

tcb  ptr 

RETURNS: 

nothing 

GLOBALS: 

replyid 

j CALLS: 

ire  p ly 

abort 

panic 

* CALLED  BY : 

' net  in 

I 

HISTORY: 

initial  coding  3/6/76  by  David  Healy  of  DTI 
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NAME  : 


u_rea  d 
FUNCTION  : 

process  a users  read  request 
ALGORITHM: 

switch  on  the  tcb  state 

case  CLOSED 

pani  c 

case  LISTEN,  SYN_SENT,  SYN_RCVD 
reply  NOT_OPEN 

case  FIN_WAIT,  CLOSE_WAIT,  CLOSING 
reply  DYING 

case  ESTABLISHED 

if  too  many  reads  out 
reply  ERROR 

if  can't  Ret  rev  buf  descriptor 
reply  N0_RES 

increment  number  of  reads  out 
initialize  the  rev  buf  descriptor  -- 
length 
offset 
re  ply  id 

if  there  is  a q'd  packet 

call  netin  to  process  it 

PARAMETERS: 

tcb  ptr 

RETURNS: 

nothing 

GLOBALS: 

event 
rep  lyi d 
FR_RCV0 

CALLS: 

pani  c 
reply 
mv  q 
netin 

I 

CALLED  BY: 

netin 

HISTORY  : 

initial  coding  3/6/78  by  David  Healy  of  DTI 
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NAME 


u_s  end 
FUNCTION : 

handle  a user  send  buffer 
ALGORITHM: 

switch  on  the  tcb  state 

case  CLOSED 

panic 

case  LISTEN,  SYN.SENT,  SIN_RCVD 
reply  NOT_OPEN 

case  FIN_WAIT,  CLOSING 
reply  NOT_OPEN 

case  CL0SE_WA1T,  ESTABLISHED 

if  too  many  sends  out 
reply  ERROR 

if  can't  get  send  descriptor 
reply  NO_RES 

increment  number  of  sends  out 
init  the  send  descriptor  -- 
length 
offset 
rep  ly i d 
log_len 
flags 

if  currently  not  in  letter 
set  the  EOL  bit 


and  buffer  length  to  fragment  size  and  mod  it  buf  size 


if  user  requested  EOL 
set  EOL  BIl 
reset  INLETTER 

if  fragment  must  add  on  for  RUBBER-EOL 

add  in  buffer  size  - fragment  size 
reset  fragment  size 

else 


set  INLETTER 


if  user  requestel  urgent 
set  the  URG  bit 

compute  seq  num  of  last  urgent  octet 
send  some  stuff  off 


PARAMETERS: 

tcb  ptr 

RETURNS: 

nothing 


79 


GLOBALS 


CALLS: 

CALLED 

HISTOFl 


replyid 
FR_SNDO 
e vent 


re  ply 
panic 
mv  q 
sadd 
send 

BY  : 
ne  t i n 
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APPENDIX  II:  TH P Subroutine  Specifications 


I 


-81 


ThP  CALLING  HIERARCHK 


The 

IHP  Module. 
Module  . 

following 
This  list 

is  a subroutine  calling  hierarchy  for  the 
contains  all  of  the  subroutines  in  the  THP 

buf _a  ddr 

calls 

mapin 

cl s_req 

ca  11s 

iorply,  q_to_net 

cl s_r  ply 

calls 

iorply,  read_q,  remove_cmb 

f 1 ush_q 

calls 

free,  iorply,  read_q 

gen_o p t 

calls 

alloc,  q_to_net 

K et_c  m b 

calls 

alloc 

Ki ve_user_data  calls 

buf_addr,  freeport,  iorply,  read_q,  write 

ROt_li ne 

calls 

parse_com,  q_to_net,  scan_rcte 

i or_re  a d 

calls 

tcp_rdrply,  tty_rdrply 

i or_write 

calls 

f ree , write_q 

1 o_read 

calls 

iorply,  q_to_net,  write_q 

lo_write 

calls 

iorply,  q_to_net 

mapln 

calls 

i oma  p 

net_d  a ta 

calls 

buf_addr,  gi ve_user_data , rewrite_q,  unmap 

ne  t_o  p ti on 

calls 

(unknown),  buf_addr,  gen_opt,  rewrlte_q, 
same_param,  stty_reply 

new_xmit 

calls 

read_q,  write 

opn_re  q 

calls 

alloc,  freeport,  get_cmb,  iorply,  mapin, 
nbopen,  remove_cmb,  write_q 

opn_rply 

calls 

alloc,  close,  free,  iorply,  read, 
read_q,  remove_cmb,  write_a 

pars  e_co  m 

calls 

(unknown),  eq_init,  print!,  scan_word 

pa  rt la l_s  can 

calls 

alloc,  proc_rec 

proc_re  c 

calls 

q_to_net,  q_to_user,  start_urment , 
thp_to_ internal 

q_ctr 1 

calls 

q_to_net 

q_t  o_ne  t 

calls 

write_q 
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q_to_user 

calls 

write_q 

rea  (i_q 

calls 

deq  , enq 

remo  ve_c  m b 

calls 

flush_q,  free,  iorply,  read_q 

rewrit  e_q 

calls 

deq 

sane_parain 

calls 

lex_coDip 

acan_rcte 

calls 

prlntf  , pu  tc 

tcp_rdrp ly 

calls 

free,  partla l_scan,  proc_rec,  q_to_user, 
read,  sta rt_urKent , thp_to_interna 1 

thp 

calls 

(unknown),  ioaddr,  iorply,  iowait,  to_net 
to_user,  write 

thp_ctr  l_irsR 

calls 

new_xtnit,  new_xiiiit 

th  p_t  o_l nt  erna  1 

calls 

q_to_net,  q_to_user 

to_net 

calls 

bu(_addr,  close,  flush_q,  Iree,  freeport, 
iorply,  new_xfnlt,  read_q,  rewrite_q, 
thp_ctrl_msff , thp_data_n)str,  unmap 

to_u8er 

calls 

fluah_q,  free,  ^1 ve_user_data , kill, 
net_data,  net_option,  read,  read_q, 
rewrite_q,  scan_rcte 

tty_data 

calls 

BOt_line,  printf,  q_ctrl,  q_to_net 

tty_rdrply 

calls 

alloc,  (rot_line,  mustfail,  q_to_net, 
read,  tty_data 

wr ite_q 

calls 

deq,  enq 
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NAME: 

cls_req 
f UNCTION  : 

Handles  a close  request  from  a user  process. 

ALGORITHM: 

If  the  connection  is  in  the  state  where  the  user  already 
closed  a not-y et-completed  connection,  complete  the  close 
with  an  error. 

Otherwise,  put  a close  request  into  the  to-net  queue. 

The  connection  will  be  closed  after  all  data  has  been  written. 

PARAMETERS : 

reply_id  integer  The  reply  id  for  the  request 

RETURNS: 

Nothinfr 

GLOfcALS : 

cp 

qe 

th  p i os 

In  the  current  CMB: 
c_state 

CALLS: 

ior ply  ( sys ) 

CALLED  ET : 

th  p (main) 

HISTORf : 

17  Eeb  197b  D A Willcox  of  DTI  Initial  codint? 
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NAME : 

cls_rply 
FUNCTION  : 

handles  a close  reply  io  messasre.  This  can  be  either 
from  the  tcp  or  from  a user  terminal. 

ALGORITHM: 

If  it  is  a close  for  a user  tty: 

If  there  is  no  network  connection 
Remove  the  CME 

else 

Fix  things  up  so  that  when  the  close  comes  from 
the  net  (it  will),  the  CMB  will  be  removed, 
otherwise 

If  we  are  in  a state  where  no  reply  has  been  sent 
to  the  user's  close: 

Send  a reply  to  the  user's  close. 

Remove  the  cmb. 

P ARAhET  EhS : 

None 

RETURNS: 

Nothing 

GLOBALS : 

cp 

, qe  = 

) th  p 1 os 

In  the  current  CMB: 
c_fld 
c_state  = 
c_stflags  = 
c_to_net 

CALLS : 

iorply  (sys) 
r ea  d_q 
re  mo  ve_c  mb 

CALLED  BY: 

th  p (main) 

HISTORY ; 

17  Feb  197fe  D A Willcox  of  DTI  Initial  coding 


NAME  : 


i o_rea  d 
FUNCTION : 

handles  a read  request  io  message. 

ALGORITHM; 

If  the  TCP  has  reported  the  connection  to  be  closed 
Reject  the  request. 

Return 

If  the  number  of  allowable  reads  has  been  exceeded 
Reject  the  request. 

Return 

If  this  is  a read  coming  in  when  there  were  none 
outstanding  before: 

Put  an  EOM  message  into  the  to-net  queue. 

This  is  for  use  when  GA's  are  being  generated. 

Save  up  a descriptor  for  the  read  buffer. 

Set  flag  indicating  that  to_user  should  be  called. 

PARAMETERS  : 

reply  int  The  reply  id  for  the  read. 

RETURNS: 

Nothing 

GLOBALS : 

op 

qe  = 

thpios  r 

In  the  current  cmb: 
e_nreads  s 
c_u reads  = 
c_sigflags  = 

CALLS : 

lorply  (sys) 
q_to_net 
writ  e_q 

CALLED  BY; 

thp  (main)  thru  lom_rtn 

HISTORY : 

14  Mar  1978  D A Willcox  of  DTI  Initial  coding 
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NAME  : 


i o_wri t e 
FUNCTION  : 

Processed  a write  request  io  messaee  to  the  thp. 
ALGORITHM: 

IT  output  should  be  rejected 
Reject  the  write 
re  t u rn 

If  the  max  number  of  allowable  writes  has  been  exceeded 
Reject  the  write 

else 

Put  a data  message  into  to-net  queue. 

Put  in  a message  to  reply  to  the  write. 

If  there  are  reads  outstandine 

Put  in  a message  indicating  EOM,  for  use  when 
sending  GA’s. 

PARAMETERS: 

reply  int  The  reply  id  for  the  write  request. 

RETURNS: 

Nothing 

GLOBALS : 

cp 

1 q e = 

‘ thpios  The  global  io  message 

/ In  the  current  cmb: 

c_nrea  ds 

c_nwrite3 

c_state 

CALLS : 

ioreply  (sys) 
q_to_net 

CALLED  BT : 

I thp  (main)  thru  iom_rtn 

HISTORY : 
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( 

t 


i or_rea  d 
FUNCTION : 

handle  a read  reply  io  message, 
ALGORITHM: 

If  it  is  a rply  from  a read  to  a tty: 
Call  tty_rdrply. 

else 

Call  tcp_rdrply. 

PARAMETERS: 

None 

RETURNS: 

Nothing 

GLOEALS: 

cp 

thpios 

In  the  current  cmb: 
c_tty_f i d 


CALLS : 

tcp_rdrply 

tty_rdrply 

CALLED  BY: 

thp  (main)  thru  iom_rtn 

HISTORY : 
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NAME 


i or_w  Pit  e 
FUNCTION: 

Handle  a write  request  io  message. 

ALGORI  THM: 

If  it  is  a reply  frorr  a write  to  a tty: 

Advance  the  pointer  to  indicate  what  was  written  from 
the  buffer. 

Set  t lap.  that  it  is  now  OK  to  write  to  the  tty  avain. 

else 

If  there  was  an  error  in  the  write: 

Free  the  transmit  buffer. 

Change  conn  state  to  indicate  closing  conn. 

else 

Save  up  the  buffer  for  later  use. 

Indicate  that  to-net  processor  should  be  called. 


PARAMETERS: 

None 


RETURNS: 

Nothing 

GLOBALS : 

cp 

qe  = 

thpios  = 

In  the  current  cmb: 
c_net_bufs  = 
c_nx_pbuf  = 
c_t_flags  = 
c_sigflag  = 
c_state  = 

CALLS : 

f re  e 
write_q 

CALLED  BY: 

thp  (main)  thru  iom_rtn 

HISTORY : 
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NAME  : 


I 

'I 


net_data 
FUNCTION : 

Net_data  processes  data  elements  in  the  to-user  queue. 

It  takes  data  from  a network  buffer  and  copies  it  into  the 
printf  bui f er . 

In  the  tty  interface,  data  is  written  from  the  printf 
buffer  directly  to  the  tty.  In  an  interface  to  the  user 
process,  a line  is  buffered  in  this  buffer  before  bein? 
passed  to  the  process  to  allow  for  local  line  editing. 

ALGOhlTHM: 

Fairly  straightforward.  Copy  data  from  in  to  out  (doiny 
any  translation  necessary).  If  the  output  buffer  fills  up, 
generate  a read  response  (for  a process  interface).  If  all 
of  the  data  in  the  to-user  queue  element  is  not  used,  put  an 
element  back  in  the  start  of  the  queue  to  cause  the  remaining 
data  to  be  copied  later. 

FARAMETERS: 

qe  Pointer  to  a q_ele  structure. 

This  describes  a hunk  of  network  input  data  to 
give  to  the  user. 

RETURNS: 

0 All  of  the  data  in  the  queue  element  was  processed. 

-1  The  data  in  the  element  was  not  completely  used. 

GLOBALS  : 

cp  The  pointer  to  the  current  connection  management  block 

In  the  current  cmb: 
c_n  reads 
c_nsy  nc  h 
c_to_user  = 
c_t_flags  = 
c_ureads  r 

CALLS : 

bu  f _a  dd  r 
give_user_data 
rea  d_q 
rewrite_q 

CALLED  BY: 

to_user 

HISTORY : 

6 Feb  1976  D A Wlllcox  of  DTI  Initial  Coding 
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NAME  : 


net_optlon 


FUNCTION : 

This  routine  handles  option  negotiations  received  from  the  net. 
ALGORITHM: 

There  are  a large  number  of  possible  cases  which  are  handled 
here  In  a fairly  brute-force  manner.  The  first  action  Is 
to  copy  the  pieces  of  the  option  into  local  variables  and 
set  f'lajrs  indicating  whether  the  option  Is  will/wont/do/dont, 
has  a s en der /re cel ver  parameter,  etc. 

The  semantics  of  the  various  options  are  handled  by 
extern  filter.  The  op tl on - 1 o- f 1 1 1 er  routine  mapping  Is 
done  with  the  table  op_filter[].  These  routines  determine 
request  is  reasonable,  and  in  some  cases  initiate  a counter- 
negotiation. 

PARAMETERS: 

qe  pointer  to  q_ele  structure 

The  queue  element  for  the  option  that  we  read  from 
the  to-user  aueue.  If  the  option  cannot  be  handled 
riffht  now,  this  element  will  be  put  back  into  the 
start  of  c_to_user. 

RETURNS: 

0 If  the  element  was  handled  ok. 

-1  If  this  option  cannot  be  handled  immediately. 

If  there  is  insufficient  buffer  space  to 

generate  a reply.  wThe  queue  element  has  returned  to 

the  queue. 

GLOEALS: 

cp 

op_ filter 
op_f la  gs 

In  the  current  cmb: 
c_op_f lags 
c to_user 


CALLS : 

buf _a  ddr 
men_opt 
rewrit  e_q 
sa  me_pa  ra  m 

CALLED  ET : 

to_user 

HISTORY : 

14  Feb  1976  D A Wlllcox  of  DTI  Initial  codina 


-9?- 


NAME  : 


opn_req 
FUNCTION  : 

This  routine  processes  an  open  request  lo  messaj^e.  Such  a 
message  arrives  when  a user  process  requests  that  a conn 
be  opened. 

ALGORITHM: 

First,  allocate  a CMB  for  the  connection.  If  there  are  no 
available  CMB's,  reject  the  open  request. 

If  the  allocation  is  successful,  initialize  the  variables  in 
the  new  cmb,  and  pass  the  open  request  on  to  the  TCP. 

While  open  is  pending,  a descriptor  for  the  open  is 
stored  in  the  to-net  queue. 

PARAMETERS: 

reply_ld  Integer  The  reply  id  for  the  user's  request 


RETURNS: 

Nothing 

GLOBALS: 

cp  = 
qe  = 

thplos  = 

In  the  newly  allocated  cmb: 
c_fid  z 
c_to_net  r 
c to_user  r 


CALLS : 

alloc 
f reep  ort 
get_cmb 
lorply  (sys) 
mapin 

n bo  pen  ( sy s ) 
wr 1 te_q 

CALLED  BY: 

thp  (main) 


HISTORY  : 
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NAME  : 


opn_rply 


F UNCTION  : 

Processes  an  open  reply  messaffe.  This  can  be  either  from  the 
CP  when  a conn  is  established  (or  the  open  fails),  or  from 
the  tty  controller  when  we  open  a user's  tty. 

ALGOHITHM: 

If  it  is  an  open  reply  from  a user  tty,  allocate  the  printf 
and  input  buffers  and  initiate  the  first  tty  read. 

For  an  open  reply  from  the  TCP: 

Allocate  and  queue  transmit  buffers. 

Allocate  receive  buffers  and  issue  reads  to  ICP. 

In  addition,  if  this  is  an  Interface  to  a process: 
Allocate  a to-user  line  buffer. 

Initialize  editinB  characters,  if  they  are  needed. 
Reply  to  the  user's  open. 

PARAMETERS: 

None 


RETURNS: 

Nothin^ 

GLOBALS  : 

cp 

qe  = 

thplos  = 

In  the  current  CMB : 
c_fid 

c_fr_pbuf  s 
c_nx_pbuf  = 
c_pbuf  r 
c_state  r 
c_stf laRS 
c_net_bufs  = 

CALLS: 

alloc 

close  (sys) 

1 n i t _c  m b 
lorply  (sys) 
r ea  d ( sy s ) 
rea  d_q 
remo ve_cmb 

CALLED  El: 

thp  (main) 


HlSTORl: 
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NAME  : 

scan_rc  te 
FUNCTION : 

When  the  remote  thp  has  WILL  fiCTE  enabled,  this  routine 
scans  the  echo  character  buffer  (cp->c_rbuf)  for  break 
chars.  If  an  rcte  set  breaks  has  come  in  and  no  break 
character  has  been  echoed,  this  routine  echos  data  up  to 
the  break  (assuminft  that  echoing  was  specified  in  the  set 
breaks  command . ) 

ALGOfilTKh: 

If  we  are  in  a state  where  we  should  echo  characters,  scan 
the  saved  tty  input  for  a break.  Echo  any  characters  that 
should  be  echoed.  If  a break  character  was  found  in  the  buffer, 
only  echo  to  there. 

P ARAMETEftS : 

None 

RETURNS: 

Nothing  - works  with  global  variables 

GLObALS: 

oh_class 

cp 

In  the  current  cmb: 

c_f  r_r bu  f 

c_nx_rbuf  = 

c_op_f lags 

e_rbuf 

c_t_f lags 

c_t  o_ne  t 

CALLS: 

print f (sys) 
putc 

CALLED  BY: 

got_l Ine 
to_use  r 


HISTORY : 
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NAME  : 

tcp_rdrp ly 
FUNCTION : 

This  routine  is  called  when  data  is  received  from  the  net. 

It,  and  routines  it  calls,  scan  the  input  for  data  and  control 
and  put  appropriate  elements  into  the  to-user  queue. 

ALGORITHM: 

While  there  is  still  data  in  the  input  buffer: 

If  there  remains  a partial  header,  call  partial_scan 
to  try  to  get  a whole  header. 

If  there  is  a partial  rec  around  (with  a whole  header) 

Put  a data  message  into  the  to-net  queue  or  copy  a control 
messaize  into  an  Internal  buffer. 

While  there  is  still  data  in  the  input  buffer: 

Process  any  STREAM  data  up  to  the  next  RM. 

Check  if  there  is  a whole  record  left  in  buffer. 

If  not  , 

set  flasts  to  pret  rest  of  record  next  time  thru, 
do  a break  (fret  out  of  inner  loop). 

Call  proc_rec  to  handle  the  new  record. 

If,  in  the  above,  we  sent  any  to  - user  queue  elements  that 
referred  to  data  in  this  buffer,  then  send  a to-user 
queue  element  to  re-lssue  the  top  read. 

Otherwise,  re-issue  the  tcp  read  right  now. 

PARAMETERS: 

los  pointer  to  iostruct  Pointer  to  the  reply  message 

from  the  r ea d . 


RETURNS: 

Nothinfr 

GLOBALS: 

cp 

qe  = 

In  the  current  CME : 
c_fid 

c_h_partlal  = 
c_sigflag  = 
c_t  buf 
c_tlen  s 
c_to_net 
c_to_us  er 


CALLS: 

partlal_scan 
proc_rec 
q_to_user 
read  (sys) 
start_u  rgent 
thp_to_internal 


CALLED  : 

thp  (main) 

HISTORY  : 
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NAME  : 

th  p ( mai n ) 

FUNCTION : 

This  is  the  main  routine  for  the  thp  module. 

ALGORITHM: 

After  some  initial  setup,  go  into  an  infinite  loop  doinn 
i owai ts . 

When  an  io  messaee  for  an  established  connection  comes  in, 
find  the  associated  cmb  for  it.  (Anything  other  than 
an  open  request  from  a user  will  be  refused  if  there  is  no 
cmb  assigned.) 

Call  a routine  thru  a table  to  handle  the  io  messame. 

After  handling  the  request,  check  if  the  request  made  it 
possible  for  us  to  send  data  to  net  and/or  pass  data  to 
user.  Keep  doing  this  until  we  can  do  no  more. 

PARAMETERS: 

None 


RETURNS: 

Never 

GLOBALS: 

cmb_ta  b 
cp  = 

f re  e_cmb 
iom_rtn 
p ta  b 

ptab_e  r 
used  cmb 


CALLS  : 

close  ( sy s ) 
cls_req  thru  iom_rtn 
cls_rply  thru  iom_rtn 
io_gtty  thru  iom_rtn 
io_read  thru  lom_rtn 
lo_speclal  thru  lom_rtn 
io_wrlte  thru  iom_rtn 
loaddr  (sys) 
iom_error  thru  iom_rtn 
lor_gtty  thru  iom_rtn 
lor_read  thru  iom_rtn 
lor_speclal  thru  lom_rtn 
lor_stty  thru  lom_rtn 
iorply  (ays) 
iowait  (sys) 
opn_req  thru  lom. rtn 
opn_rply  thru  lom_rtn 
q_to_net 
read_q 
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server_ctrl 

to_net 

to_user 

tty_8tty  thru  iotn_rtn 
write  (sys) 


CALLED  EY: 

No 

one 

HISTORY  : 
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NAME  : 


th  p_c  t rl_ms  a 
bUNClION: 

Formats  a thp  control  record  into  the  current  output  buffer. 
ALGORITHM: 

Check  if  there  is  room  for  the  record;  it  not,  call  new_xmit . 
build  the  output  record  in  a straightforward  manner. 
PARAMETERS : 


xbuf 

p t r 

t 0 

q_ele  struct 

Descriptor  of  current  output 
buffer 

type 

intefter 

Code  for  the  type  of  messaee 

first 

p t r 

t 0 

character 

First  character  of  parameters 
(if  any  ) 

last 

pt  r 

to 

character 

Last  character  of  parameters 

for  the  control  record  \ 

RETURNS: 

-1  There  is  insufficient  buffer  space  for  the  record. 

0 The  record  has  been  put  into  the  transmit  buffer 

GLOBALS : 

None 

CALLS: 

new_xmit 

CALLED  BY: 

to  net 


HISTORY  : 

21  Feb  1978  D A Willcox  of  DTI 
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th  p_dat  a_msg 
FUNCTION : 

Formats  a data  record  in  current  output  buffer.  If  data 
record  fills  the  buffer,  dump  the  buffer  to  the  TCP  module. 

ALGORITHM: 

While  there  is  still  input  data  to  write: 

If  in  record  mode  and  not  appending  to  an  old  data 
record : 

Set  up  a record  header. 

Copy  as  much  data  into  the  output  record  as  possible. 

If  there  was  not  enough  room  for  all  of  the  data, 

Write  the  old  buffer  and  get  a new  one. 


PARAMETERS: 

xbuf 


inlen 


ptr  to  q_ele  struct 


first  ptr  to  character 


integer 


This  is  the  descriptor  of  the 
current  output  buffer 
The  first  data  character  to 
write 

Number  of  data  characters  to 
write 


RETURNS : 


CALLS: 


integer  - The  number  of  characters  written.  If  this 

is  less  than  inlen,  then  insufficient  transmit 
buf  f er  apace. 


GLOEALS: 


In  the  current  CMB 
c s tf  lacrs 


new  xmit 


CALLED  El: 

to  net 


HISTORY : 
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thp_to_int«rna 1 
FUNCTION : 

This  routine  is  called  to  scan  net  data  for  end-of-line 
(cr-lf)  sequences.  It  wr'tes  data  msas  into  the  to-user 
queue,  interspersed  with  tnessa<res  markinK  end-of -messapre . 

ALGORITHM: 

The  c_t_fla(rs  byte  in  the  CMB  is  used  to  remember  that  a OR 
was  seen  in  one  buffer,  but  there  was  no  character  after  it. 
(The  character  immediately  following  a CH  must  be  either  a LF 
or  a null.)  Thus: 

If  the  character  in  the  previous  buffer  was  a CR,  check  the 
first  character  in  the  current  buffer.  Send  a newline 
character  to  the  user,  if  appropriate. 

Scan  thru  each  character  in  the  buffer: 

If  the  current  character  is  a CR: 

If  this  is  not  the  last  character  in  this  buffer: 

If  the  next  character  is  a newline: 

Change  the  CR  to  a NL. 

Write  everything  to  here  to  the  user. 

If  it  was  CR-LF,  write  an  EOM  message. 

else 

Set  a flag  to  remember  that  the  last  character 
in  this  buffer  was  a CR . 
break  out  of  the  loop. 

else 

Just  skip  by  the  character. 

Write  all  data  from  the  last  write  to  the  end  of  the  buffer. 
bARAMETERS: 

first  ptr  to  character  Pointer  to  first  character 

read  in 

last  ptr  to  character  Pointer  to  one  past  last 

character 

RETURNS: 

Nothlnir 

GLOBALS : 

cp 

qe  = 

In  the  current  CMB:  « 

c_t_flags  = 

CALLS  : 

q_to_uaer 

CALLED  BY: 

proc_rec 

tcp_rdrply 
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NAME  : 


t o_ne  t 
(•UNCTION  : 

Reads  to-net  queue  and  calls  routines  to  store  data  and  control 
records  into  the  transmit  buffer. 

ALGORITHM: 

Loop  until  we  run  out  of  to-net  queue  elements  or  transmit 
buffers : 

Read  an  element  from  the  to-net  queue. 

Switch  on  the  function  code: 

Functions  that  require  puttinff  data  or  controls  into 
the  transmit  buffer  are  handled  by  passing 
info  to  either  thp_ctrl_ms(r  or  th  p_d  a t a_msjr . 

Others  are  done  locally. 

If  an  entire  message  worth  of  data  was  put  into  the  output 
buffer, 

Make  sure  it  has  been  written. 


PARAMETERS: 

None 


RETURNS: 

No  th  1 n jr 

GLOEALS : 

cp 

In  the  current  CME: 
c_nosynch  = 
c_siRflaK  = 
c_stflaas  = 
c_to_net  = 
c net  but  3 = 


CALLS : 

buf  _a  dd  r 
f reep or t 
i or  ply  (sys) 
new_xm  i t 
rea  d_q 
rewr 1 te_q 
th  p_c  t rl_ms  B 
thp_data_ms>r 
unmap 

CALLED  El  : 

th  p (main) 

HISTORY : 
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NAME  ; 


to_user 
FUNCTION ; 

This  is  the  routine  that  reads  the  to-user  queue  containintr 
data  and  controls.  The  TCP  interface  scans  input  records  and 
puts  appropriate  entries  into  this  queue. 

ALGORITHM: 

Loop  until  it  is  time  to  stop: 

Read  one  element  from  the  queue  cp  ->  c_to_u3er. 

Switch  on  the  function  code. 

Some  functions  are  handled  rlffht  away,  others  are 
passed  on  to  external  routines. 

If  the  func  cannot  be  handled  immediately  ( e . p . it 
is  a data  msg  and  no  outstandintr  read  from 
the  user),  then  put  the  element  into  queue  and 
return. 


PARAMETERS: 

None 


RETURNS : 

Nothing 

GLObALS : 

cp 

In  the  current  CMB: 

c_br_ i n 

c_e line 

c_erase 

c_lrcte  = 

c_lxmlt  s 

c_nabort8  s 

c_nosynch  = 

c_n3ynch  = 

c_s  tf lags  = 

c_t_flags  = 

c_t_mode 

c_to_u8er 


CALLS : 

gl ve_user_data 

net_data 

net_option 

read_q 

kill  (sys) 

rewr ite_q 

8can_rcte 

CALLED  BY: 

‘ thp  (main) 

tt 

i 

V 

1 
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NAME.  : 


tty_data 


FUNCTION  : 

Processes  input  from  the  user's  tty 
ALGOHITHM: 

Scan  thru  the  data,  check  each  character  for  special  controls: 
If  it  is  literal  escape,  take  the  next  character  literally. 
If  it  is  the  end-line  character; 

Call  <rot_line  to  process  data  or  command. 

Send  an  EOM  command  to  to-net  processor. 

If  it  is  character  erase: 

Delete  a buffered  character  or  send  an  THP  tC. 

If  it  is  line  delete: 

Delete  line  locally  if  we  can. 

Otherwise,  send  a THP  EL. 

If  it  is  an  IP  or  AO  character: 

Call  frot_llne  to  process  previous  data. 

Put  an  appropriate  control  into  the  to-net  queue. 

If  it  is  first  character  in  line  and  it  is  the  command  flag 
Set  the  fla<r  that  we  are  in  command  mode. 

If  none  of  the  above,  buffer  the  character. 

Finally,  if  we  are  in  SThEAM  mode  or  HCTE  is  in  effect: 

Call  Kot_llne  to  send  any  data  not  yet  sent. 


PARAMETERS  : 


first 

ptr  to  char 

Pointer  to 

the  first 

char 

read 

1 n 

len 

integer 

Number  of 

chars  that 

were 

r ea  d 

i n 

RETURNS: 

ptr  to 

char  - pointer 

to  the  next 

address  to 

read 

Into 

GLOBALS: 

cp 

In  the  current  CMB : 

c_com_f la 

c_delete 

c_e line 

c_erase 

c_escape 

c_f r_i buf 

c_lnterrupt 

c_op_f laRS 

c_stflaRs  = 

c_t_f laRS  = 


CALLS: 

(tot_llne 

prlntf 

q_etrl 

CALLED  BY: 

tty_rdrply 
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NAME  : 


tty_r(lrply 


FUNCTION  : 

Handles  a read  reply  lo  messafte  from  the  user's  tty. 
ALGOhITHM: 

Pass  the  data  read  In  to  tty_data,  which  does  the 
scanning  for  special  characters,  and  normally  sends  data 
to  the  net . 

If  the  current  Input  buffer  Is  completely  full  and  there  Is 
too  much  data  In  It  that  still  hasn't  been  sent  to  the  net, 
then  call  Rot_llne  to  force  the  data  out.  (A  command 
line  could,  conceivably,  be  truncated.) 

If  the  Input  buffer  Is  full  to  the  hl(^h  water  mark, 

Alloc  a new  Input  buffer. 

Copy  data  that  hasn't  been  sent  from  the  old  to  the 
new  buffer,  and 

Put  a free  buffer  msg  Into  the  to-net  queue,  so  that 
the  old  buffer  will  be  freed  at  the  correct  time. 

Initiate  a new  tty  read.  If  read  returns  data 

right  away,  loop  to  start  and  handle  the  new  data. 

PARAMETERS: 

None 

RETURNS: 

Nothing 

GLOBALS : 

cp 

qe  r 

thplos  s 


In  the  current  cmb: 
c_e_lbuf  = 
c_lbuf  s 
c_fr_ibuf  r 
c_slgflags  r 
c_to_net 

CALLS: 

alloc 
q_to_net 
read  (sys) 
tty_data 

CALLED  BY: 

thp  (main) 
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